OnTimeを使ったのですが「エラー」になってしまいます

ＶＢＡ　でOnTimeの「サンプル」を使ってのタイマーですが、実行すると次のようなエラーが出て、実行マクロへ行けません。

「マクロ"I:\一定時間後に.xls'!実行マクロ名'が見つかりません。」

どうしてなのか教えてください。

Option Explicit
Dim 待ち時間
Dim 指定時刻

Sub 一定の時間間隔でマクロを実行する()

指定時刻 = Now + TimeValue("0時00分05秒") '5秒後
待ち時間 = TimeValue("0時00分01秒")


Application.OnTime TimeValue(指定時刻), "実行マクロ名", TimeValue(待ち時間)

End Sub

Sub 実行マクロ名()
Dim wavfile As String
wavfile = "C:\Windows\Media\ringin.wav " 'wavファイルのパス
Shell "mplay32.exe /play /close " & wavfile

End Sub

No.2 ベストアンサー 回答者： onlyrom 回答日時： 2007/11/04 14:14

提示のマクロで動作するはずですが

＞「マクロ"I:\一定時間後に.xls'!実行マクロ名'が見つかりません。」
と出たとすれば原因は２つ考えられます。

（１）提示したコードと実際実行したコードが違う
　　　例えば、”実行マクロ名”というマクロ名ではない
（２）コードを書いている場所が、標準モジュールではない
　　　例えば、Sheet1のシートモジュールとか


ということで、マクロ名が正しいか確認後、次のようにしてください。


１．ＶＢＥの画面を開く

２．「挿入」メニュー　＞　「標準モジュール」と進み、「標準モジュール」を挿入する

３．画面上部のタイトルバーに、「Module1 コード」と表示されてるか確認したあと、
　　コードウィンドーに質問のコードをコピー＆ペースト

５．ＶＢＥ画面を閉じて、実行
　

これでちゃんと動作するはずです。
　

この回答へのお礼

標準モジュールで動作させると正常に実行されました。
何日も迷いに迷っていたので実行できて大変うれしく思います。
誠にありがとうございました。

お礼日時：2007/11/04 15:19

No.1 回答者： himajin100000 回答日時： 2007/11/03 20:52

これと同じ現象でないか確認を。

http://oshiete1.goo.ne.jp/qa3196717.html

この回答への補足

ご回答ありがとうございました。
ＶＢＡはまだ始めたばかりで良く分かりません。
説明の中に
解決策として「Normal.dot にマクロを作成します。 」とは何を意味するのでしょうか？

よろしくお願い致します。

補足日時：2007/11/03 22:19