RSSユーザー
エクセルの音出しについてです
お世話になっております。エクセルの特定セルの値（ポジション関数の値とか）、あるいは手動で特定セルの数字入力後エンターキーを押した時などに音ってだせますか、お教えください。自動売買で約定した時「ピンポーン」とか手動で入力した時「ズギューン」とか出来たらなあと思いまして。
2020年10月14日
質問掲示板
岡三RSS
集いの広場
RSSユーザー
エクセルの音出しについてです
お世話になっております。エクセルの特定セルの値（ポジション関数の値とか）、あるいは手動で特定セルの数字入力後エンターキーを押した時などに音ってだせますか、お教えください。自動売買で約定した時「ピンポーン」とか手動で入力した時「ズギューン」とか出来たらなあと思いまして。
2020年10月14日
アップロードされたファイルにはウイルスチェックを行っておりますが、未知のウイルス等に感染されている場合がありますので、アップロードされたファイルのご利用はご注意ください。
また、取引パスワード等の重要な情報を投稿内容に含めないようご注意ください。
なお、アップロードされたファイルの利用や投稿内容によって、投稿者自身や他の利用者が被った損害に対して当社は一切責任を負いません。
また、セキュリティの関係上、一部コマンド等を含む内容を送信するとエラー画面が表示され、投稿ができない場合がございます。何卒ご了承ください。
岡三RSS集いの広場では、複数の単語による検索が可能です。
例）関数 and サンプル
→AND検索となり、「関数」および「サンプル」を含む検索結果が表示されます。
例）関数 or サンプル
→OR検索となり、「関数」または「サンプル」を含む検索結果が表示されます。
例）関数 not サンプル
→NOT検索となり、「関数」を含むが「サンプル」は含まない検索結果が表示されます。
※and、or、notの前後は半角スペースで区切ってください。
※単語の間を半角スペースで区切るだけだと、OR検索となります。
大野 了
RSSユーザさんこんにちは！！
Excelで音声を鳴らすためには、音声を鳴らす処理を
PlaySoundAPIを使用して、VBAにて鳴らしてあげる必要があります！！
以下に簡単なサンプルを記述しまーす！！
POSITION関数や、ORDERRESULT関数などで、
約定を監視しておいて
約定したら、PlaySoundを使って音を鳴らすと
『ズギューン』と鳴らすことができまーす！！
===========================================
Option Explicit
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long
Private Sub CommandButton1_Click()
Call PlaySound("C:\sound.wav", 1, 1)
End Sub
===========================================
2020年10月14日
RSSユーザー
すみません、VBA初心者です。どこのセル値に対応してますか、あと音源はC:\sound.wav", 1, 1に入れておくということでしょうか、すみません。
2020年10月14日
大野 了
>このセル値に対応してますか
こちらは、具体的には
『どこにサンプルのVBAを記述すればよいか？』
という事でしょうかー？
理解力が無く申し訳ありません・・・
＞あと音源はC:\sound.wav", 1, 1に入れておくということでしょうか
これも説明がほぼ無くサンプルだけ記述してしまい申し訳ありません。
Call PlaySound("C:\sound.wav", 1, 1)
が、実際に音を鳴らす関数となります。
いろいろと説明すると難しくなるのですが、
第一引数の"C:\sound.wav"が鳴らしたい音源となります
ですので、
ピンポーンの音源を『ピンポーン.wav』
ズギューンの音源を『ズギューン.wav』
として、ファイルの保存場所を"C:\音源"としますと・・・
Call PlaySound("C:\音源\ピンポーン.wav", 1, 1)
とすると『ピンポーン』と音が鳴り
Call PlaySound("C:\音源\ズギューン.wav", 1, 1)
とすると『ズギューン』と音が鳴ります！！
RSSユーザさんがVBAをどの程度使われているかわからないので、
RSSユーザさんに適した説明になっているかわかりません。
もしご不明な点がありましたら、遠慮なく返信頂けますと幸いです！！
VBAはあまり使わないし難しいですもんね・・・
2020年10月14日
RSSユーザー
できました！ありがとうございました！
2020年10月14日
大野 了
おぉぉ！！
うまくいきましたか！！
良かったです！！
2020年10月14日