Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


58834 / 76732 ←次へ | 前へ→

【22621】Ontimeがうまく使えません
質問  おっさん  - 05/2/24(木) 21:56 -

引用なし
パスワード
   ▼IROC さん:
>>WindowsMediaPlayerを使わずにMp3を繰り返し演奏し停止できますでしょうか?
>
>曲の時間が分かっているなら、
>一定時間後にOntimeで再度マクロを実行してはいかがですか?

*IROCさん御指導ありがとうございます。

 Ontimeメソッドを使用とのことですが、ヘルプで調べましたところ
 −−−−−−−−−−−−−−−−−−
 次の使用例は、午後 5 時に my_Procedure を実行します。
Application.OnTime TimeValue("17:00:00"), "my_Procedure"
 −−−−−−−−−−−−−−−−−−−−
とありました。
my_Procedure"はプロシージャでしょうか?

今、演奏のコードを次のようにしますと
Private Sub CommandButton1_Click()
Dim Name As String
    Name = Worksheets("ケース2").Range("A1")
    WindowsMediaPlayer1.URL = Name
End Sub

 *Ontim は、どのように記載するすると繰り返すことができるのでしょうか?
   を
Private Sub CommandButton1_Click()
Dim Name As String
    Name = Worksheets("ケース2").Range("A1")
    WindowsMediaPlayer1.URL = Name
   Application.OnTime Now + TimeValue(00:00:45"), "CommandButton1_Click"
End Sub
とすると、
「マクロ "C:\・・・\WindowsMadiaPlayer1.xls".!Comandbutton_Clickが見つかりません」と表示されます。
 又、
Application.OnTime Now + TimeValue(00:00:45"), WindowsMediaPlayer1.URL = Name
としても、同じです。
初歩的な質問で申し訳ありませんが御指導ください。
又、繰り返しは数回したく思っております。
0 hits

【22566】コントロールのmadiaplayerの操作マクロを教えてください。 おっさん 05/2/23(水) 21:54 質問
【22574】Re:コントロールのmadiaplayerの操作マクロ... IROC 05/2/24(木) 8:43 回答
【22621】Ontimeがうまく使えません おっさん 05/2/24(木) 21:56 質問

58834 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free