2020-01-01から1年間の記事一覧
functions.phpに記載 固定ページや記事に [sc]って感じで書く ネタ元 https://tech-dig.jp/wordpress_json/https://web.hazu.jp/php-in-wordpress-content/
functions.phpに記載 $json_arr = g…
6. 金利サイクルはどのように計算されますか？資産の換金にはどのくらいの期間がかかりますか？プール・セービングでは、入金したその日からすぐに利息が発生します。利息は、現在の日の00:00から翌日の00:00まで（UTC）の日割りで計算されます。償還は翌日…
private bool IsAdministrator() { var identity = System.Security.Principal.WindowsIdentity.GetCurrent(); var principal = new System.Security.Principal.WindowsPrincipal(identity); return principal.IsInRole(System.Security.Principal.WindowsBu…
@echo off cd /d %~dp0 :<ここから>実行権限と引数で分岐 :管理者特権で実行しないとエラーになる処理 openfiles > NUL 2>&1 :上記処理がエラー（ユーザー権限）であれば一般権限で実行する処理に移動 if NOT %ERRORLEVEL% EQU 0 goto promotion :実行権限と…
最新版にしてると、なにかのアップデートで勝手に対象が変わり、ATL周りでコンパイルエラーになることがある。 その場合はWindows SDKバージョンを前のにして固定すれば治る
入力規則を使う With Range("B2").Validation '入力規則を削除 .Delete '入力規則の設定 'エラーメッセージのスタイルは「停止」 .Add Type:=xlValidateDate, _ Formula1:="2015/1/1", _ Operator:=xlLessEqual, _ AlertStyle:=xlValidAlertStop .InputTitle…
'// 行と列を標準サイズに設定 Range("A1:B2").RowHeight = ActiveSheet.StandardHeight Range("A1:B2").ColumnWidth = ActiveSheet.StandardWidth ネタ元 https://vbabeginner.net/%E8%A1%8C%E3%81%AE%E9%AB%98%E3%81%95%E3%81%A8%E5%88%97%E3%81%AE%E5%B9%…
https://uptimerobot.com/無料で50サイトも登録できるし、スマフォアプリがあるので警告受け取れてうれしい。===================================== 無料プランでは５分毎にHTTPステータスコードを確認してくれます（有料プランは１分おき）。ステータスコ…
DateAdd(単位, 加算時間, 日時)日時に単位の加算時間を計算した結果を取得します。引数「単位」 引数「加算時間」の単位を表す文字を指定します。 引数「加算時間」 引数「日時」に加算する時間を数値で指定します。 引数「日時」 元になる日時を指定します…
日本語版以外のwindows使ってるとでる。「システムロケールの変更」で日本語を選びましょう。 ネタ元 http://itemy.net/?p=1839
時間の差分とった時の表示方法は セルの書式設定で下記の形式を記入します。 [h]:mm ネタ元 https://www.cando.co.jp/column/column_09.html
セルにロック属性つけてからの VBAで Worksheetオブジェクト.Protect UserInterfaceOnly:=True ネタ元 https://tonari-it.com/excel-vba-protect-userinterfaceonly/
こちらからイメージDLできる https://developer.microsoft.com/en-us/microsoft-edge/tools/vms/ https://developer.microsoft.com/ja-jp/windows/downloads/virtual-machines/ 2020/9/8時点でvirtualboxが不安定。 仕方ないからHyper-V使ったらうまくいった…
' ************************************************** ' PowerShellの実行（Execコマンド使用バージョン） ' ************************************************** Private Function ExecPowerShell(cmdStr As String) As String ' WshShellオブジェクト D…
# アセンブリの読み込み Add-Type -Assembly System.Windows.Forms # メッセージボックスの表示 [System.Windows.Forms.MessageBox]::Show("ここにメッセージ", "タイトル") ネタ元 https://letspowershell.blogspot.com/2015/06/powershellmessagebox.html
普通にtry-catch https://qiita.com/NakaD/items/6979223ef9e6560d047c
お得なFRがすぐわかる。sushiどっかいったな。https://rdk.me/fr/
FTXは追証なしなので楽しく遊べる。https://note.com/jacko/n/n45a59db28c57
「ポップアップの発生時」をレジストリで設定する方法はハイブ HKEY_CURRENT_USER キーパス Software\Microsoft\Internet Explorer\TabbedBrowsing 値の名前 PopupsUseNewWindow 値の種類 REG_DWORD 値のデータ 0：ポップアップを開く方法を Internet Explor…
例にアニメーション付きでコピーする 'C:\CopySource以下にあるファイルをすべてC:\CopyTarget\以下にコピーする。 'コピーに時間がかかる場合はコピー中のダイアログが自動的に表示される。 'このサンプルを動作させるにはフォーム上にコマンドボタンを１つ…
プラグインを使おう 「Table of Contents Plus」 ネタ元 https://ferret-plus.com/13648
Application.Quitで即終了するわけではない '警告メッセージを表示しない Application.DisplayAlerts = False '保存 Call ActiveWorkbook.Save '終了させる Application.Quit ThisWorkbook.Close ネタ元 http://hensa40.cutegirl.jp/archives/1286
https://note.com/jacko/n/n45a59db28c57単位はbtcなので$100でやるなら 注文サイズは0.01とかに読み替えてね。サブアカウントを使って損失制限することも忘れずに。 https://learn-trade.tech/how-to-use/sub-account
issに以下記述 ;excel起動してたら終了 [Code] function IsAppRunning(const FileName: string): Boolean; var FWMIService: Variant; FSWbemLocator: Variant; FWbemObjectSet: Variant; begin Result := false; FSWbemLocator := CreateOleObject('WBEMScr…
32bitExcelから呼び出すDLLなのに64bit用のregasmで登録してないかい？ANYCPUで作ったDLLとしても 32bit用のregasmで登録しないと呼び出せないよ。
Dependenciesがよいです。 https://lucasg.github.io/Dependencies/ DependenciesGui.exeで確認しましょう。Dependency Walkerはもう古いです。日本語フォルダ名あるとうまく動かなかったし。
最終行を取得する With Sheets(<シート名>).UsedRange LogRow = .item(.count).Row End With ネタ元 https://excel-ubara.com/excelvba4/EXCEL222.html
クリアする方法は次の5種類Clear：全てクリア ClearContents：数式、文字列をクリア ClearFormats：書式をクリア ClearComments：コメント文をクリア ClearOutline：アウトラインをクリア Sub test() Worksheets("Sheet1").Cells.Clear End Sub ネタ元 http:…
#If Win64 Then Private Declare PtrSafe Sub GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) #Else Private Declare Sub GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) #End If Private Function GetLocalTime() As String Dim …
