excelのマクロの定数を取得する

1504 ワード
JScript VB Excel wsf Excel テキストリンク

JscriptでExcelを操作する際に、Excelのマクロ定数の値が必要になるので、その値を取得するためのスクリプト

スクリプトを作成する際に、Excelのマクロ（キーボードの操作記録で自動的に作成されるものなど）を参考する場合がある。そのスクリプトには、関数の引数に定数が記述されている場合がある。その値を、知るために作成した。
なお、VBScriptとJScriptを使用したwsfファイルなので、拡張子は「wsf」とします。
（JScriptを使用する必要はありませんが...）

Excel.wsf
<job id="ExcelJob">
<!-- エクセルのライブラリを宣言(マクロの定数を取得するため) -->
<reference guid="00020813-0000-0000-C000-000000000046"></reference>
<script language="JScript">
//  Jscriptを利用する必要はありませんが^^;
    WScript.Echo("エクセルマクロの定数を得る。\nVer 1.0");
    function msg(str) {
        var myXLData = 0;
        eval("myXLData = " + str + ";");
        WScript.Echo("var " + str + " = " + myXLData + ";");
    }
</script>
<script language="VBScript">
    Dim Input 
    Input = InputBox("マクロの定数を入力してください。", "Excel定数 1.0")
    msg Input
</script>
</job>