エクセルマクロの中で保存している歌を聞き終わった後、その歌が閉じれない

・
・
ActiveWorkbook.FollowHyperlink Address:="C:\Users\monta\Music\北島三郎\ファンが選んだベストヒット\01 橋.mp3"
歌が終了した時点でこのファイルを閉じて、エクセルも閉じたいのです。

No.1 回答者： neKo_deux 回答日時： 2018/09/13 17:21

> ActiveWorkbook.FollowHyperlink Address:="

この方法で再生すると、エクスプローラから対象ファイルをダブルクリックして再生みたいな方法になります。
エクスプローラには対象ファイルの再生が終わったのかどうか？分かりませんから、ファイルが開きっぱなしになります。
同様に、Excelも再生しろって命令出したっきり、再生終了の通知や確認する術は無いです。

mp3ファイルを関連付けしている音楽プレーヤーで、１曲再生終了したら閉じる、処理終了するような設定できるなら、そういう対応は可能かも。


古い記事で、自分の手元にExcelが無いので確認できないですが、下記の方法で再生してみては。

NARKIVE NEWS GROUP ARCHIVE - Excel-VBA でメディアファイルを再生する方法
http://microsoft.public.jp.excel.narkive.com/sQG …

この回答へのお礼

neKo_deux さん　ありがとうございます。
現在の方法では、閉じられないということですね。
添付されてるアドレスでテストしてみます。
マクロの途中で指定の音楽を聴き、終わった段階で閉じる違った方法がありましたら教えていただけないでしょうか。
よろしくお願いします。

お礼日時：2018/09/13 17:54