バッチファイルからVBA実行でエラー

バッチファイルからエクセルのマクロを動かそうとしているのですが、
処理はきちんと動いて処理を行なうのに、エラーウィンドウが出力され
”未知実行時エラーです”（画像添付）となり困っています。
どうすれば、このエラーを無くせますでしょうか？

因みにバッチファイルは以下の通りです。

Dim obj

Set obj = WScript.CreateObject("Excel.Application")

obj.Visible = True

obj.Workbooks.Open "C:\Documents and Settings\ne05576\My Documents\Datamove.xls"

obj.Application.Run "FileMove"

よろしくお願いします。

No.1 ベストアンサー 回答者： kybo 回答日時： 2012/12/04 15:59

おそらく「FileMove」のマクロの記述に誤りがあるのだと思います。

ＦｉｌｅMoveの記述を単純に以下にしてテストしたところ、こちらの環境では何の問題もなく動作しました。

Sub FileMove()
MsgBox "OK"
End Sub

この回答へのお礼

ご回答ありがとうございました。

どうやらEND SUBの前に、ENDで処理を終わらせている部分があった為だったようです。
プログラムを直したら正常終了し、エラーウィンドウは出力されませんでした。

お礼日時：2012/12/04 16:22