#概要
VBAやVBSでCOM連携のコードを書いていて、ふとメソッド・プロパティの一覧が見たくなることがあります。
あれ、ウインドウ取得のWindowsメソッドってShell.applicationだっけ、Wscript.Shellだっけ、メンバー見れたら分かるのになとか、僕はよくあります。
いや、VBAなら参照設定すればインテリセンス効くじゃんって話ですけど、結局最後は配布用にCreateObjectに書き換えるのに、いちいち参照設定するのは面倒だし、書き換え漏れをなくすためにも最初からCreateObjectで書いていくこと、ありませんか?
ネット見たくても周りの目があって見れない、そんなときに使ってください。
#方法
VBAでもVBScriptでも、以下のコードを実行すればメソッド・プロパティが表示されます。
Dim wShell
Set wShell = CreateObject("Wscript.Shell")
wShell.Run "PowerShell -NoProfile -NoExit -Command $com = New-Object -ComObject ●ComObject名●;$com|Get-Member"
PowerShellを使います。PowerShellでは、標準でCOMオブジェクトのインテリセンスも効きますし、メンバーも取得できます。
もちろん、PowerShellから
$com = New-Object -ComObject ●ComObject名●
$com|Get-Member
でもOKです。
#おまけ
メソッド・プロパティの値の取得もできます。VBAならローカルウインドウでできますが。
PowerShellはメソッドの後ろに()が必要なので気をつけてください。
Dim wShell
Set wShell = CreateObject("Wscript.Shell")
wShell.Run "PowerShell -NoProfile -NoExit -Command $com = New-Object -ComObject ●CreateObjectの名前●;$com.●メソッド()又はプロパティ●|Select-Object *"
![2020-05-17 (7).png](https://qiita-user-contents.imgix.net/https%3A%2F%2Fqiita-image-store.s3.ap-northeast-1.amazonaws.com%2F0%2F622636%2Fcca73470-27c5-f812-2d24-d0bf80fc8077.png?ixlib=rb-4.0.0&auto=format&gif-q=60&q=75&s=9da8762b650c553a2347762eadfdf57f)
![2020-05-17 (6).png](https://qiita-user-contents.imgix.net/https%3A%2F%2Fqiita-image-store.s3.ap-northeast-1.amazonaws.com%2F0%2F622636%2F180bbace-24c2-4db3-0810-d8329c677821.png?ixlib=rb-4.0.0&auto=format&gif-q=60&q=75&s=cdc3c729b9ba32540a3ff5903c7cb98e)
こちらもPowerShellで直接書いた方がシンプルです。
$com = New-Object -ComObject ●CreateObjectの名前●
$com.●メソッド()又はプロパティ●|Select-Object *
個人的に、閉鎖的な環境で開発しているためか、VBA/VBScriptで困るとPowerShellに頼ることがよくあります。
次回はVBA/VBScriptでWebスクレイピングする際のPowerShell併用法について書こうと思います。
PowerShell,いいですよ!
追記
Nortonでスクリプトの実行として弾かれることがあるようです。
その場合はNorton側でEXCEL等のスクリプト実行の設定を許可してください