メモ Excelセルの値を座標としてPowerPointスライドに描画する使い捨てマクロ。 選択されているExcelセル範囲 Excel.Application.ActiveWindow.RangeSelection 起動しているPowerPoint.Applicationの取得 VBA.Interaction.GetObject(Class:="PowerPoint.Appl…

使用するPDF編集ソフト Acrobat Standard (2021年11月頃) PDF文書の用途 普通の文書を想定 Acrobat JavaScript は使用禁止とする setPageBoxes による ArtBox の削除は不可とする Acrobat Standardでは「ページボックスを設定」でアートサイズ(赤線)、仕上が…

仮に雲マークのような注釈が入った状態で保護されているPDFファイルに遭遇した場合を考える。 注釈の再現を優先する場合 以下の場合、注釈を追加するのに使用されたと思われるPDFビューアから再印刷するのが無難。 図面に注釈で線や文字を継ぎ足しされている…

バージョンは2021年11月頃のもの(DocuWorks Desk Version 9.0.9 など)。 DocuWorks Viewer 操作メモ テキストアノテーションで「たて書き」が出来るので重宝 縦書きテキストを0.01mm単位で位置を調整できる アノテーションツールバーに「タイトル」を追加し…

記載のないものは単に操作方法を調べていないだけです。 注釈のフラット化 バージョンは2021年11月頃のもの Acrobat Pro DC 印刷工程 → プリフライト フィックスアップ「すべての注釈をページコンテンツに統合」 PDF-XChange Editor コメント → コメント管理…

メモ AddCurveで雲枠の一部分に見えそうな曲線を描くマクロ。 参考資料リンク Shapes.AddCurve method (PowerPoint) | Microsoft Docs 使い捨てマクロ ' PowerPoint 2013, Windows 10 Option Explicit ' マクロの表示(Alt+F8)で選択しやすくする Public Sub …

メモ 自然順ソートとして StrCmpLogicalW を DllImport して Add-Type で加える ソートは List.Sort メソッドかバブルソート 参考資料リンク StrCmpLogicalW function (shlwapi.h) - Win32 apps | Microsoft Docs Working with Strings - Win32 apps | Micro…

メモ ファイル名"バインダー1_Part1.pdf"といった連番ファイルだけが入ったフォルダ内のファイル名をワークシートに書き出す使い捨てExcelマクロ。連番部分の抽出に便利。 ファイル名の文字列の分割に VBScript_RegExp_55.RegExp を使っているだけ。Excelマ…

メモ ExecutionPolicy を RemoteSigned として PowerShell_ISE.exe を起動するだけのショートカットを作成するVBAとPowerShellスクリプト PowerShell_ISE.exe のパラメーターは気にしない 参考資料リンク WshShortcut Object | Microsoft Docs Creating .NET…

メモ ファイル名から -match で連番の数字を取り出す 参考資料リンク about Regular Expressions - PowerShell | Microsoft Docs Everything you wanted to know about variable substitution in strings - PowerShell | Microsoft Docs 使い捨てスクリプト …

既存のフォルダ名をクリップボードにコピーする。 # PowerShell 5.1, Windows 10 (Get-ChildItem -Directory).Name | Set-Clipboard コピーしたフォルダ名を here-string として貼り付ける。 # PowerShell 5.1, Windows 10 $dirNames = @' 新しいフォルダー …

メモ multidimensional array の内容を Add-Member で PSCustomObject に写して PSCustomObject の配列を ConvertTo-Csv に渡す 参考資料リンク about Arrays - PowerShell | Microsoft Docs Add-Member (Microsoft.PowerShell.Utility) - PowerShell | Micr…

メモ CSVの操作ではなく、PSCustomObjectの配列をどう扱うか 参考資料リンク Everything you wanted to know about PSCustomObject - PowerShell | Microsoft Docs 使い捨てスクリプト ConvertTo-Csv に続けて ConvertFrom-Csv を実行した後の内容を見る # P…

メモ Docs の Call operator & と CallByName function を参照してください。 参考資料リンク about Operators - PowerShell | Microsoft Docs CallByName function (Visual Basic for Applications) | Microsoft Docs 使い捨てスクリプト ショートカット(.l…

Docs の about_Script_Blocks を参照してください。 # PowerShell 5.1 # Windows 10 # このスクリプトをメモ帳で保存する際は、 # 文字コードを UTF-8(BOM付き) として保存してください。 Set-StrictMode -Version Latest $f0 = { param([double[]]$x) Write…

Excel 2019, Windows 10フォント(英数字)は Cambria としてください。 「力率cos𝜃、3𝜙4W、位相差±120°、室温25°C、𝜔=2𝜋f、角度𝜑」\theta =DEC2HEX(UNICODE("𝜃")) 1D703 Cambria / 拡張文字 - レベル1 / Mathematical Italic Small Theta =DEC2HEX(UNICODE("θ…

以下の使い方の確認用の練習用マクロです。 PageSetup Range.Value Shape.TextFrame2.TextRange.Text ' Excel 2019 ' Windows 10 Option Explicit Public Sub Main() Dim app As Excel.Application Dim wb As Excel.Workbook Dim ws As Excel.Worksheet Dim …

メモ 同じフォルダ内にある大量のファイルに対して、ある程度の融通を利かせてリネームしたい場合に便利かもしれません。Excelでマクロを使うよりも、PowerShellの実行結果をExcelシートに貼り付けて加工するほうが作業的に早い気もします。 使い捨てマクロ …

メモ 下記の動作を行うPowerShellスクリプトです。 Get-ChildItemのBaseName、Extension、NameプロパティをExcelシートに書き出す ExcelシートでRename-Itemの文字列を生成する セキュリティソフトによっては、日本語のファイル名を対象に多くのRename-Item…

メモ PowerPointのスライドにAddPolylineでフリーフォームを描画する。 フリーフォームにおける頂点の座標は、GetObjectとRangeSelectionで起動中のExcelから取得する。 参考資料リンク GetObject function (Visual Basic for Applications) | Microsoft Doc…

正確な内容は電力工学の教科書を参照してください。 電圧降下の式 (電流-抵抗) オーム法 凡例 虚数単位 自然対数の底 送電側の中性点oに対する送電端a相の電圧(実効値) 受電端c相に対する受電端a相の電圧(実効値) 受電端a相の電流(実効値) 線路lにおけるa相…

大量のファイルに対して、ある程度の融通を利かせてリネームしたい場合に便利かもしれません。例えば新版PDFと旧版PDFのページを1つのPDFに交互に並び替えたい場合に役立つと思います。 ・PDF編集ソフトでPDFのページを分割 ・分割されたPDFのファイル名を調…