• ベストアンサー

Beep音を鳴らしたい

ExcelVBA初心者です。 Beep音を鳴らしたいのですが、Beepステートメントを使用しても鳴らないのです。Windowsの設定に問題があるのでしょうか。 よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • Wendy02
  • ベストアンサー率57% (3570/6232)
回答No.5

BLUEPIXYさんの回答へのレスではっきりしましたが、 >プログラムイベントの中に「一般の警告音」がありません。 が原因のようですね。何か入れたソフトで書き換えられたのでしょうね。 [特定のサウンドが鳴らなくなりました] http://homepage2.nifty.com/winfaq/c/trouble.html#643

参考URL:
http://homepage2.nifty.com/winfaq/c/trouble.html#643
takaandhiro
質問者

お礼

ご回答いただいたサイトで解決いたしました! ありがとうございました。

その他の回答 (5)

  • BLUEPIXY
  • ベストアンサー率50% (3003/5914)
回答No.6

>Declare~ は >使い方がわかりませぬ(;_;) VBA(VBE)での先頭部分に コピペすることで MessageBeep という関数が元からあるようにVBAで使えます

  • m-toshi
  • ベストアンサー率31% (6/19)
回答No.4

最初の回答で言っておけばよかったのですが、 ヘッドホンで音を確認するのも1つの方法かと 思います。

  • m-toshi
  • ベストアンサー率31% (6/19)
回答No.3

BLUEPIXYさんの回答でも、ダメだったのですね。 単純にスピーカーが付いていないとかでは ないですか ?

takaandhiro
質問者

補足

スピーカーは付いておりまする(;_;) あきらめるしかないですかね?

  • BLUEPIXY
  • ベストアンサー率50% (3003/5914)
回答No.2

>プログラムイベントの中に「一般の警告音」がありません。 変ですね~。 メッセージ(警告) とかはありますか? ちなみに Declare Function MessageBeep Lib "user32" (ByVal uType As Long) As Long してやれば ' &h30:警告、&h10:システムエラー、0:一般の警告音,beep MessageBeep(&H30) で「警告」を鳴らすことができます。 昔、プログラムイベントの追加の方法を知っていたのですが、忘れてしまいました。(普通使うモンじゃないしね)

takaandhiro
質問者

補足

メッセージ(警告)はありまして、 音も鳴っております。 せっかく書いてくださったのですが、 Declare~ は 使い方がわかりませぬ(;_;)

  • BLUEPIXY
  • ベストアンサー率50% (3003/5914)
回答No.1

コントロールパネル~サウンドとオーディオデバイスから サウンドの中で プログラムイベント 一般の警告音 が鳴らせるかどうか確認して下さい。 Beepステートメントで鳴るのはこの音なので。

takaandhiro
質問者

お礼

早速のご回答ありがとうございます。 残念ながら、プログラムイベントの中に「一般の警告音」がありません。 試しに、全てのイベントに音を設定してみて、Beepを試したのですが、やはり鳴りません。 いろんな操作で音がなるようには、なってしまったんですけどね。 何か別の設定をしないと、「一般の警告音」は出てこないのでしょうかね?

関連するQ&A

  • BEEP音

    タスクバーの一番右側(通知領域?)にあるスピーカーのアイコン 音量設定のアイコンですが。 音量設定のスライドバーを移動させた後、「ビイ」ってスピーカーから音(BEEP音)がしますよね? 最近これがスピーカーから出なくなりました。かわりに、PC本体の内部から「ピ」っと小さな音がでます。 もちろんミュートにはしてません。 他の音(DVD、CDの再生)は正常です。 VBで動作チェック時に「BEEP」を使ってるので不便です。 元のBEEP音を出すにはどうしたら良いでしょうか?

  • Beep音を有効にしたい

    この前にBeep音を無効化にしたのですが、 この音が無くなってから不便になったので、 誰か詳しい方Beep音の有効の方法を教えてください・・。

  • Beep音を出すには?

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 'Beep音を出す Dim I As Integer For I = 1 To 100 ' Loop 100 times. Beep() ' Sound a tone. Next I End Sub 上記のコードでBeep音を出したいのですが、鳴りません。 (Beepコードは、VBのサンプルコードです。) OS:WinXP SP3 VB.NET Ver2003です。 フォームにコマンドボタンを一つ貼り付け、 コマンドボタンのクリックイベントで Beep音を鳴らしたいです。 PCのデバイスマネージャ設定は、 Beep音が有効になっています。 他の音(Win立上音他)は、デフォルトのままです。 詳しい方、教えて下さい。

  • [BEEP起動音]が鳴りません ...。

    今日、[BEEP起動音]が鳴っていないことにきづきました。  原因は(素人考えですが)二週間前ころからつかいはじめた、アンチウィルスソフト[AVG FREE 7.0.308]の 起動時の[ブートアップスキャン]とBEEP起動音のタイミングが重なってしまっているからかな?と考え、BEEP起動音を鳴らそうと思いAVG FREEの常駐項目である [AVG7_EMC]、[AVG7_CC]、[AVG7_AMSVR]をスタートアップから外してみたのですが、それでもブートアップスキャンは実行されているようで BEEP起動音を鳴らすことはできませんでした。  また、音量関係の設定も確認したところ問題はありませんでした。 そこで四点質問なのですが、 1. [BEEP起動音]は必ず鳴っていなければいけないものなの でしょうか。それとも[BEEP起動音]が、何らかのソフトを入れたことによって鳴らなくなることは めずらしい事ではない、ということなのでしょうか。 2. [コントロールパネル]の[マルチメディア]などの設定は今回の症状と関係があるのでしょうか。また、現在CD-ROMは[デバイスマネージャ]で[挿入の自動通知]のチェックを外していますが関係あるのでしょうか。 3. [AVG FREE]を一度アンインストールしたほうがよいのでしょうか。 4. これといって他に問題がでていなければ放っておいても大丈夫なのでしょうか。                                  ご教示お願いいたします。 富士通製FMV-BIBLO MF4/600R

  • 奇妙なBEEP音(?)が鳴ります

    使用するパソコンはOSがWindoesXP。パソコン工房という自作パソコンのメーカーの機種を使っており、購入時からハード面の変更は行っておりません。またWindowsの設定は、隠しファイルを表示するなどフォルダオプションの設定を少々変更した以外には特に触っておりません。 ウィルス対策ソフトはavastのフリー版、ファイアーウォールにはZonealarmを使い、あとスパイボットを常駐させています。 相談ですが、一ヶ月ほど前からパソコン使用中に「シュッ」という物をこすりつけるような感じのBEEP音が鳴るようになりました。連続ではなく、マウスクリックのときの音のような感じです。 なにか特定の操作をしてるときとは限りませんが、強いて言えば、動画ファイルを再生しているときに多いようです。(メディアプレイヤーは、GOMプレイヤーとPowerDVD(バンドル版)を使っています) この音はWindowsに標準で組み込まれているものでしょうか。だとしたら、どのような時に鳴るものなのでしょう。 よろしくご教示お願いいたします。

  • 〔至急〕beep音について

    初心者ですがよろしくお願いします。 パソコンはクレバリーで買ったBTOを使っています。 OSはVISTAです。 質問ですが、リンクをクリックすると、beep音が鳴り ページが開けません。〔2回に1回くらい〕 ただ右クリックして〔新しいウィンドウで開く〕をクリックすると、 ページが開きます。 flashのリンクもbeep音が鳴ってまったく開きません。 flashのリンクの場合右クリックしても〔adobe flash player10〕についてが表示されて開けません。 誰かこの症状がどういうものかわかる方いらっしゃいますでしょうか? 誤字脱字あるかもしれませんがよろしくお願いします。

  • VBAのBeep音

    エクセルVBAでBeepを使うと、今までは 「チン」という多分Ding.wavだと思うのですが、何も設定をいじっていないのですが、今日は「ビィッ」という音なのです。 しかもボリュームコントロールで全ミュートにしても「ビィッ」が鳴るのです。 どうしてかわかりません。 Windows2000、エクセル2000です。 よろしくお願いします。

  • Beep音が鳴らない

    HP ProLiant ML310の端末にServer 2008 OSをセットアップして、 USBスピーカーを接続している状態で、メモ帳を起動させメモ帳の バージョン確認の画面でメモ帳をクリックすると、メモ帳の バージョンが波打つのですが、一般の警告音(Beep音)が鳴りません。 解決方法をご教授して頂けないでしょうか。 また、そもそもServer 2008 OSをセットアップした端末で、上記の 一般の警告音(Beep音)は鳴るのでしょうか。 因みに、サウンド設定から一般音源の再生(テスト)は可能で音は 聞こえます。

  • Windows2000におけるBeep音

    現在Windows2000を使用しています。 使用している時に時々鳴るBeep音を消したいのですが、 どのようにしたらいいのでしょうか。 宜しくお願いします。

  • Windwos2000でBEEP音を止めたい!

    普通、Windows2000ではBEEP音が出ないと思うのですが、 ある時から急にエラー時などにBeep音がなるようになりました。 この音を止めたいのですが、どなたか知っていませんでしょうか? よろしくお願いします。 スピーカーはささっていません。