- ベストアンサー
VBA で警告音
VBAで警告音を鳴らす際にBeepを使っています。 このたび、3種類の警告音が必要なったのですが、VBAのBEEPの場合 「一般の警告」がなるだけなので、数種類の警告音が出来ません。 何か良い方法はありませんか?
- B_BOSS
- お礼率10% (18/166)
- Visual Basic
- 回答数3
- ありがとう数2
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
警告音(「メッセージ (警告)」や「メッセージ (情報)」)を直接出すのでしたら、既出の質問で回答されて いる、APIを使用します: http://oshiete1.goo.ne.jp/qa747208.html なお、APIに慣れていなくて敷居が高く感じられるようでしたら、SendKeys関数とMsgBoxで擬似的に やってしまうというのもひとつの手だと思います。 試しに、現在の「Beep」の記述を、以下のコード(コメントを除けば実質2行)に置き換えてみて下さい: '「Enter」キーの信号(?)を送信します SendKeys "{Enter}", False '「システム エラー」の音を出します '(MsgBox自体は、上でのEnterで自動的に閉じられます:たまに残ることがありますが(汗)) MsgBox "", vbCritical ・・・以上です。 なお、MsgBox関数の「vbCritical」を、「vbInformation」にすれば「メッセージ (情報)」の音に、 「vbExclamation」にすれば「メッセージ (警告)」の音に、それぞれ変えることができます。 (実際に鳴る音は、Windows側の設定に依存するので注意: コントロールパネルの「サウンドとオーディオデバイス」等で「システム エラー」時の音を変えると、 Access側で鳴る音も変わります) 本来ならMsgBoxに表示するアイコンの切替用の引数ですし、SendKeysは時に予想外の 動作をすることがあるということで、あまりお勧めはできませんが、こんな方法もあるという ことで、ご参考まで。
その他の回答 (2)
- imogasi
- ベストアンサー率27% (4737/17068)
APIですが、 http://hpcgi1.nifty.com/kenzo30/b_cbbs/cbbs.cgi?mode=al2&namber=6009&rev=&no=0&P=R&KLOG=42 にWAVファイルの演奏が載っています。 数種類の警告音をどう探すか、どう作るかの問題はありますが、何かWAVファイルでやってみては。過去にゲームからなどから入っているかもしれない。
- akina_line
- ベストアンサー率34% (1124/3287)
こんにちは。 下記サイトをご参照下さい。 http://exceler.blog68.fc2.com/blog-entry-20.html API関数のBEEPを使うと音階が作れます。 では。
関連するQ&A
- PCの警告音?について
ビーという警告音?が時々なります 間隔は不定期でPCが立ち上がってからしばらくしてなります BEEP音なのかと思いデバイスマネージャからBEEP音オフの設定をして再起動までしましたが直りませんでした ボタンを押しっぱなしでなるわけでもありません もちろんミュートにしてあります 対処法がありましたらよろしくお願いします
- 締切済み
- その他(パソコン)
- 警告音について
Access2007を使ってます。 メッセージボックスの 警告音は、はい/いいえ しか選択できないのですが、例えば一つのフォームの数種類の警告音を使い分けたい場合 どのようにすれいいのでしょうか 1種類だけでしょうか
- ベストアンサー
- その他(データベース)
- エクセルで警告音の出し方についての質問です。VBA
エクセルで警告音の出し方についての質問です。VBA データを外部から取り込みエクセルのグラフを作成しております。 データはランダムに数値が入ります。 数値が100以上の場合にPCから5分間、警告音を鳴らしたいのですがどのようなプログラムを組めばよいでしょうか? なお、警告音はエンターキを押して解除できるようにしたいです。 宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- VB6.0「警告音?beepでは無い?」
普通のソフトでは 新規作成とかをクリックすると、「ピ~コン」と音が鳴りますよね? beepでやったのですが「ボン」とゆう小さな音しかなりません(T_T; あの警告音のような音はどうやって出すのでしょうか?
- ベストアンサー
- Visual Basic
- Beep音が鳴らない
HP ProLiant ML310の端末にServer 2008 OSをセットアップして、 USBスピーカーを接続している状態で、メモ帳を起動させメモ帳の バージョン確認の画面でメモ帳をクリックすると、メモ帳の バージョンが波打つのですが、一般の警告音(Beep音)が鳴りません。 解決方法をご教授して頂けないでしょうか。 また、そもそもServer 2008 OSをセットアップした端末で、上記の 一般の警告音(Beep音)は鳴るのでしょうか。 因みに、サウンド設定から一般音源の再生(テスト)は可能で音は 聞こえます。
- 締切済み
- ハードウェア・サーバー
- Excel VBAでBEEP音を鳴らす方法を教えて
Excel VBA初心者です。 Worksheetの9行目 ”A9からAZ9”間のいづれかのセルに”当たり”の文字があれば、10秒間、音の大きさも調整できるBEEP音を鳴らす方法を教えてください。 使用環境は、 Win8.1でEXCELは2010を使用しています。 (追伸) なお、もし可能ならば、 同様に 9行目(A9:AZ9)のいづれかのセルに ”当たり” があれば ”ファンファーレ”のような【効果音】をならし、 ”はずれ” があれば ”Beep音”を鳴らす方法がわかれば ”BEST回答” に選ばせていただきます。
- ベストアンサー
- オフィス系ソフト
- 警告音を出したい!!
どうやら兄貴が勝手に音をアンインストールしたようで、立ち上げた時の音や、警告音がでません。(コントロールパネル→サウンドで、一般警告音などを選ぼうとすると、ファイルが見つからないと表示される) もう一度インストールしたらいいのですが、それをどうするかわかりません、というか、だいたいわかってるけど、間違えて変な事したら怖いからできません。 やり方を教えて下さい。 NECのVALUESTAR・NXのWindows98です。 初心者ではないのですが、わかりやすく教えていただけたら幸いです。 あと兄貴が勝手なことしないようにする方法ありましたら教えて下さい(笑)
- ベストアンサー
- Windows 95・98
- 警告音がビープ音に変わってしまった
質問させて頂きます。 Windows XPを使用しているのですが、先日から警告メッセージなどが表示される際、ビープ音が鳴る様になってしまいました。 それまでは一般の警告音(ポンッ、というような)だったのですが…。 一応色々調べて出てきた解決策、例えば「HKEY_CURRENT_USER\AppEvents\Schemes\Apps\.Default」に新規アカウントからファイルをインポートや、コントロールパネルのサウンドで一般の警告音の設定など確認したのですが直りません。 ちなみにおかしくなった現象としては、警告音がビープ音に、PC起動・終了時の音が鳴らないです。ボリューム変更の確認では通常の警告音が鳴ります。 (.Defaultのインポート直後の再起動ではPC起動時の音が鳴ったのですが、また鳴らなくなってました。) 音が違うというだけなので然程困ってはないのですが、あまりビープ音が好きではないので戻したいなーと思っています。 よろしければ回答お願いします。
- ベストアンサー
- Windows XP