beep音ではなく音楽（mp3ファイル）を鳴らしたい （ＶＢＡ）

Sub test()
If ●● Then
Else
"○○.mp3"　’←10秒間ならしたい
End If
End Sub
は可能でしょうか？
ご教授よろしくお願いします！！！

No.1 ベストアンサー 回答者： hallo-2007 回答日時： 2009/04/13 22:21

参考になるかどうかわかりませんが

http://www.geocities.jp/nchikada/he/index.htm
にあるファイルをダウンロードして、VBエディターで確認すると
.WAVのファイルを再生するコードが出ていたと思います。

この回答へのお礼

おお！これはすごいですね！参考にします。ありがとうございます。

お礼日時：2009/04/13 22:52

No.3 回答者： xls88 回答日時： 2009/04/14 09:50

サウンドを再生する

http://officetanaka.net/excel/vba/tips/tips22.htm

この回答へのお礼

調べてくださってありがとうございます。

お礼日時：2009/04/14 21:53

No.2 回答者： imogasi 回答日時： 2009/04/13 22:59

もっとＧｏｏｇｌｅを活用のこと。

Ｇｏｏｇｌｅで「vba 音楽再生」で照会したらコード例がたくさん出ます。
ほとんど全て
ＡＰＩをＶＢＡから使う
ActiveXコントロールを使う
例だと思うが。
まずそういう例を１，２勉強してやってみて、わからない点を聞くほうがよかろう。

この回答へのお礼

わかりました！
今はやりの「ぐぐ」ってみます！
ありがとうございます。

お礼日時：2009/04/14 00:07