0

VBScript でいくつかのコードを使用して、.xlsm ファイルを開き、そのファイルを保存しました。今度は、.xltm ファイルと同じことをしたいと思います。スクリプトを使用して xltm ファイルを開こうとしましたが、正常に動作します。そのファイルを保存する際、デフォルトの場所とデフォルトの拡張子が参照されます。新しく開いたファイルを拡張子「.xlsm」で指定した場所に保存する必要があります。進め方がわかりません。これを解決するのを手伝ってください。

Set objExcel = CreateObject("Excel.Application") 
Set WBTestFile = objExcel.Workbooks.Open(WScript.Arguments(0))'SourceFile
WBTestFile.save 
WBTestFile.close 
objExcel.Workbooks.Open(WScript.Arguments(0))

ここでは、ファイル名 (パス付き) を引数として渡しています。最後のステートメントで、新しく保存した「.xlsm」ファイルを開く必要があります。引数: "c:\test\book1.xltm"、新しく作成したファイルを "C:\test\" に拡張子 "xlsm" で保存したいと考えています。

4

1 に答える 1