【ｖｂａ】Beep音が鳴らない

質問

Beep音を鳴らしたいのですが
Sub Macro()
Beep
End Sub
では鳴りません。

でもデバッグしても何も起こりません。
音楽は聴けるのでスピーカーは正常です。

何がいけないのでしょうか？
よろしくお願いします。

回答No.4

Wendy02 · ベストアンサー

>まず「音量」というのが探せませんでした　
Window のVersion は？
#1さんの手順は、どこまで行きましたか？

音楽を聴いたりした後に、ミュートをクリックしたままにすると、音がならないことがあります。

お礼

と思ったら仰るとおりミュートになっていました。
お騒がせしました。
再度ありがとうございます。

回答No.3

Wendy02

こんばんは。

まだ、上手く行っていませんか？
#1さんのところで、「音量」のデバイス音量の詳細設定をクリックして、
ボリュームコントロールのところをみてください。

レバーのところをクリックすれば、音が出るはずです。
よく、そこが、最低音量にしていたりすることが多いです。

お礼

まず「音量」というのが探せませんでした　汗
「サウンド」の中にあるのでしょうか？
ただ音楽などは大きな音で聞けるので原因は不明です。
ありがとうございます。

回答No.2

imogasi

#1のご回答がポイントと思いますが、
http://officetanaka.net/excel/vba/statement/Beep.htm
の「ビープ音の鳴る時間と周波数はコンピュータの機種によって異なります」を注目と載っているコード例を実行してみてください。
numを１でなく１０ぐらいにしてテストしてみては。

お礼

教えて頂いた方法を試してみたのですが何も鳴らないので
パソコン自体に原因があるのかもしれません
ありがとうございます。

回答No.1

kawais070

WindowsXPの場合ですが、

コントロールパネル→サウンド、音声、およびオーディオデバイス
→サウンドとオーディオデバイス→サウンド

とクリックして、「プログラムイベント」の欄の「一般の警告音」
として登録されている音声が Beep ステートメントで鳴ると
思います。

もし、コントロールパネルの上記の設定が行われていないのなら、
設定してみてください。

お礼

コントロールパネル確認してみます！ありがとうございます。