ぐぐってみると .Net のArrayListを使ったりという情報があるけど、そこまでしたくない時。 WorksheetFunction.Sortが使えた。 Dim dicSum As New Dictionary, v 'なんか格納 For Each v In WorksheetFunction.Sort(dicSum.Keys, 1, 1, True) Debug.Print "k…

TarrayField の Fields や FieldValues を使うという情報があったが、なぜか先頭要素しか取得できなかった。 FieldByName() で取得した TField を TDataSetField へキャストし、 TDataSetField の NestedDataSet->Eof を見ながら Next() していく方法でうま…

support.microsoft.com 便利だが、立ち上げ方法が分かりにくい。スタートメニューから起動出来るように %AppData%\Microsoft\Windows\Start Menu\Programs を開き、 新規作成 → ショートカット で下記を入力し、エンター powershell.exe -Command & """"C:\P…

PS> dir \\リモートのPC\巨大ファイル ディレクトリ: \\xxxx\xxx\bin\logs Mode LastWriteTime Length Name ---- ------------- ------ ---- -a---- 2022/01/12 20:25 68290811 巨大ファイル.log サーバのログの監視などでしょっちゅう状態を知りたいときな…

立ち上げたExcelにカレントディレクトリのファイル名一覧を書き出す ($sheet = (New-Object -ComObject excel.application).workbooks.add().sheets.add()).Application.Visible=$true $r = $sheet.range("a1") dir -Name | foreach { $r.value = $_; $r=$r.…

powershellの練習がてら作成。 コメントや空行などを維持したままで更新してくれる。 <# .SYNOPSIS iniファイルへの変更指示をコマンドラインから受け付けて処理する .example .\iniUtil セクション名1.パラメータ1=値1 セクション名2.パラメータ2=値2 スペ…

Aというクラスがあるとして class A { [string]$s1 }.Net のList型を用意 using namespace System.Collections.Generic $alist = New-Object List[A]状態を見ると、List型にはAddというメソッドがあり、 A型を１つ入れられることが分かる。 $alist.GetType()…

ショートカット cmd.exe /c powershell -noexit \app\scripts\toExcel2.ps1 を作り、そのショートカットへ複数フォルダをドラッグアンドドロップすると、 フォルダ毎別シートになって、ファイル名一覧をシートに書き込む。 拡張子が.DATまたは.csvのものは内…

これがあるとき UnicodeString s = "xxx" これはできるのに UnicodeString where = " abc" + s + " = :" + s; これは出来ない UnicodeString where = "and " + " abc" + s + " = :" + s; 理由：char*とUnicodeStringをつなぐときには+演算子と自動変換が inc…

https://xxxx.sharepoint.com/sites/xxxxxxxxxxxxxxxx/Shared%20Documents/Forms/AllItems.aspx?id=%2Fsites%2Fxxxxxxxxxxxxxxxxxxxx&viewid=xxxxxxxxxxxxxxxxxこのようにsites という言葉が2回でてくるパターンの場合、ブラウザのアドレスバーからURLをコピ…

Excel関連の処理のある、C++Builder 4.2 のプロジェクトをbcc32（従来のコンパイラ）からbcc32c（Clang）へ移行するときの話。 C++Builder -> プロジェクト -> オプション -> C++コンパイラ -> "従来のコンパイラ" を外した場合、Clangによるコンパイルに切…

{ "vim.hlsearch": true, "vim.wrapscan": false, "security.workspace.trust.untrustedFiles": "open", "vim.useSystemClipboard": true, "files.autoGuessEncoding": true, "editor.wordWrap": "off", "git.autofetch": true, "gitlens.views.defaultItemL…