Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How can I play a .WAV file in Excel if a condition is met?
Can anyone please tell me how I can play a .WAV file in Excel if a condition
is met using the IF statement? |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How can I play a .WAV file in Excel if a condition is met?
Roy,
Right click the sheet tab, select "View Code", and paste this code into the window that appears. This assumes that you have a formula like =IF(C1="Test", "True", "False") in cell A1 of that sheet. Private Sub Worksheet_Calculate() If Range("A1").Value = "True" Then PlayMySound ("C:\Windows\Media\Jungle Error.wav") End If End Sub In a regular codemodule in the same workbook, paste this code: Declare Function sndPlaySound32 Lib "winmm.dll" Alias _ "sndPlaySoundA" (ByVal lpszSoundName As String, _ ByVal uFlags As Long) As Long Sub PlayMySound(myFileName As String) Call sndPlaySound32(myFileName, 0) End Sub HTH, Bernie MS Excel MVP "Roy" wrote in message ... Can anyone please tell me how I can play a .WAV file in Excel if a condition is met using the IF statement? |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How can I play a .WAV file in Excel if a condition is met?
Bernie,
Thanks for that, how do I copy the second piece of code into a regular codemodule? Roy "Bernie Deitrick" wrote: Roy, Right click the sheet tab, select "View Code", and paste this code into the window that appears. This assumes that you have a formula like =IF(C1="Test", "True", "False") in cell A1 of that sheet. Private Sub Worksheet_Calculate() If Range("A1").Value = "True" Then PlayMySound ("C:\Windows\Media\Jungle Error.wav") End If End Sub In a regular codemodule in the same workbook, paste this code: Declare Function sndPlaySound32 Lib "winmm.dll" Alias _ "sndPlaySoundA" (ByVal lpszSoundName As String, _ ByVal uFlags As Long) As Long Sub PlayMySound(myFileName As String) Call sndPlaySound32(myFileName, 0) End Sub HTH, Bernie MS Excel MVP "Roy" wrote in message ... Can anyone please tell me how I can play a .WAV file in Excel if a condition is met using the IF statement? |
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How can I play a .WAV file in Excel if a condition is met?
Roy,
Copy the code, press Alt-F11 from Excel to open the VBEditor, press F4 to open the project explorer, select your workbook, then use Insert / Module command to insert a regular codemodule. Then paste the code into the window to the (usually) right. HTH, Bernie MS Excel MVP Bernie, Thanks for that, how do I copy the second piece of code into a regular codemodule? Roy |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Stop excel from dropping the 0 in the beginning of a number? | Setting up and Configuration of Excel | |||
Insert & link a graphic file in Excel 2003 -- updatable pictures! | Excel Discussion (Misc queries) | |||
How do I unlock FILE access? | Excel Discussion (Misc queries) | |||
Reflecting info between an excel file and a word one or two excel file. | Links and Linking in Excel | |||
Very slow in opening Excel 97 file in Excel 2003 | Setting up and Configuration of Excel |