• 締切済み

Excel VBAの、Beepの音量を上げたい

教えてください。 Excel VBAで、Call ApiBeep を使って音を鳴らしていますが、音量が小さいです。 VBAの引数などで音量を上げる方法があれば良いのですが、方法はないのでしょうか? または、このBeepは、Windowsのシステム上に存在する何かの音を使用しているのでは、と思います。 そのシステム上の音声ファイルを、もっと音量の大きい別の音声ファイルに差し替えてしまうことが可能でしょうか? やり方をご教示頂きたいです。 ちなみにPCの音量は最大にしています。 OSはWindowsは7、Excelのバージョンは2007です。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.2

https://oshiete.goo.ne.jp/qa/3594426.html という記事を見つけた。 ほかにhttps://oshiete.goo.ne.jp/qa/3618512.html 「API」などで調節できるのかと思ったのが、意外でした。 そういえば、自作パソコン組み立て時に小型スピーカーがマザーボードにあったような。 それが音を出すなら、ソフトでの音量調節は難しそう。 でもhttp://www.pc-master.jp/jisaku/speaker.html マザボードにスピーカーを取り付ける のスピーカーから、エクセルのVBAのBeepの音は出ているのではなさそうだが。 'Declare Function ApiBeep Lib "kernel32" Alias "Beep" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long Sub test02() 'シート1で小鳥の擬音を出したい行に For b = 1500 To 2000 Step 100: Call ApiBeep(b, 20): Next End Sub などAPIでも、音量は触れていない。 浅学でとりとめもなく、失礼。

回答No.1

コントロールパネル、サウンドのサウンドタブ、プログラムイベントのどれかの警告やエラーの音に連動しているのでは。 > そのシステム上の音声ファイルを、もっと音量の大きい別の音声ファイルに差し替えてしまうことが可能でしょうか? 可能ですが、Excel以外で上のエラーや警告が出た際に大きな音になっちゃいます。 サウンドの設定変えるよりは、個別に.wavファイルを再生するとかの方が良いかも。 Office TANAKA - Excel VBA Tips[サウンドを再生する] http://officetanaka.net/excel/vba/tips/tips22.htm

関連するQ&A

  • VBAのBeep音

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

  • Excel VBAでBEEP音を鳴らす方法を教えて

    Excel VBA初心者です。 Worksheetの9行目 ”A9からAZ9”間のいづれかのセルに”当たり”の文字があれば、10秒間、音の大きさも調整できるBEEP音を鳴らす方法を教えてください。 使用環境は、 Win8.1でEXCELは2010を使用しています。 (追伸) なお、もし可能ならば、 同様に 9行目(A9:AZ9)のいづれかのセルに ”当たり” があれば ”ファンファーレ”のような【効果音】をならし、 ”はずれ” があれば ”Beep音”を鳴らす方法がわかれば ”BEST回答”  に選ばせていただきます。

  • 異なった周波数のBEEP音を左右別々に鳴らす

    ヘッドホンまたはスピーカーから異なった周波数のBEEP音を左右別々に鳴らしたり,左右の音量を変えたりするにはどのようにしたらよいでしょうか? あらかじめ用意した音声ファイルを利用する以外の方法はありますか? Visual C++.netを利用しています.

  • エクセルVBAでBeep音は?

    エクセル2000、Win2000です。 VBAで音を出そうと、下記のマクロを記述しました。 ところが、「MsgBox i & "回実行しました。」の部分を、コメントブロックしたら一回しか鳴りません。ビー、ビー、ビーと三回鳴ると思ったのですが、どうしてでしょうか? Sub sound() Dim i As Integer For i = 1 To 3 Beep 'MsgBox i & "回実行しました。" Next i End Sub

  • DVDの音量について

    DVDをパソコンで再生するときに再生プレイヤーの音量を最大にして さらに、windowsのシステム全体の音量も 最大にしているのですが、音が十分大きくなりません。 もっと大きくする方法はあるのでしょうか?

  • エクセルのBEEP音でメール送信するには?

    エクセルファイルにエラーが生じた場合にBEEP音を出す仕組みのファイルがあるのですが、PC上で音を感知したらエクセル以外のプログラムからメール送信できるソフトあるいはアプリがあれば教えて頂きたいのですが...。

  • Beep音が鳴らない

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

  • エクセルVBAがMACで動かない

    WINDOWSで開発したVBAがMAC(マック)で動かない(コンパイルエラーが起こる)という現象が起こっています。 ネットで検索していて「VBAがMACで動かないことがある」ということは認識しているのですが、 ・MACで動かすことは可能か ・動くようにするには、どうすればよいか(コードを変更する、EXCELのバージョンを変える等) の2点について教えていただければと思います。 <バージョン> OS MAC 9.1  EXCEL バージョン 「MAC EXCEL 2001」 <エラーメッセージ> SUBまたはFUNCTIONが定義されていません。 <VBA内容> エクセルシートの文字列をカンマ区切りでテキストファイルに吐き出すだけです。 一部でもお答えいただけると助かります。よろしくお願いします。

  • GOMプレイヤーでの視聴時の音量

    WindowsVistaでGOMプレイヤーを使っているのですが、音量があまり大きく出来ません。タスクにあるオーディオの音量も最大、GOMプレイヤーの音量も最大にしているのですが、音が小さいです。幾つか動画をリストに入れて、再生してR次のファイルを右クリックして次のファイルに送ると、システム音量35と出ます。これをあげれば良いと思うのですが、その方法が分かりません。音量の上げ方を教えてください。

  • 音量調節について

    こんにちは。 WAV形式で録音した音声を保存したのですが、音量が小さくて聞き取りにくい為、 音量を大きくしたいと思っています。音量を変更して知人に渡したいので、ど のPCで聞いても同じ音量。という具合がよいのです。 一度保存した音声ファイルの音を大きくする事ができるフリーソフトは存在す るのでしょうか? Windows2000を使用しています。

専門家に質問してみよう