| |
▼健太郎 さん：
こんばんは。
>エクセルにWindows Media Playerのファイルを貼り付けるには「挿入→オブジェクト→ファイルから」で実行できることは知っているのですが、例えばエクセルのセルに再生したい時刻が書かれていて、その時刻をクリックするとWindows Media Playerの再生したい時刻から自動的に再生することはできないでしょうか？
セルには、文字列ではない時刻が入っていることを前提とします。
時刻が入っているセルをダブルクリックしたときにスケージュールするようにしました。
仮にSheet1の場合,
Sheet1のシートモジュールに
'======================================================
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
' 実際には、時刻が入っているかチェックも必要です
Application.OnTime Target.Value, "sheet1.開始"
Cancel = True
End Sub
'=========================================================
Sub 開始()
MsgBox "動いた?"
' ここに再生コードを記述するようにしたらどうでしょうか？
End Sub
BeforeDoubleClickイベントが発生した回数分、スケージュールされますから
例えば、2回ダブルクリックすると、2回「開始」というプロシジャーが実行されてしまいます。
実際には、そのあたりの制御も必要かもしれません。
詳しくは,OntimeメソッドのHelpを参照してください。
|
|
