エクセルシートに挿入－図形から長方形を挿入し、下記のマクロを設定しました。 図形をクリックしたところ、アクション１→２→３の順には実行されず、まず２と３が同時に実行され、１のコメントは３のメッセージボックスのＯＫを押した後に表示されました。 １の表示が３よりも後になるのは、１の処理に時間がかかるためかと思います。 まず１が表示され、２のサウンド再生が完了するまで待ってから３のメッセージ表示という形にしたいです。 よろしくお願いいたします。 Sub Macro1() ’アクション１ ActiveSheet.Shapes(1).TextFrame.Characters.Text = "サウンドが鳴ります" ’アクション２ Shell "C:\Program Files\Windows Media Player\wmplayer.exe C:\windows\Media\Alarm06.wav", vbHide ’アクション３ MsgBox "サウンド終了です" End Sub
↧