.wav help for vb

Try

Cheers for the Help, but It still doesn't work at all

Private Declare Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, _
ByVal hModule As Long, ByVal dwFlags As Long) As Long

Const SND_SYNC = &H0
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Range("S41").Value > 99 Then
FName = "C:\windows\media\ding.wav"
Call PlaySound(FName, 0&, SND_ASYNC Or SND_FILENAME)
End If
End Sub

Is there anyway I can get a sound to play easy if the value goes over 99 or what ever value I pick? Iv been trawling the formums taking codes altering them to what I need to no avail.



Also what if I need multiple values could I play different sounds? like one to go off at > 75 and another at > 99 ??

The amended code does work - I tested it.

Where have you placed the code - it needs to go in the worksheet code module - right click the sheet tab and select View Code.

VoG II said:

The amended code does work - I tested it.

Where have you placed the code - it needs to go in the worksheet code module - right click the sheet tab and select View Code.

Click to expand...

Its on my active sheet atm ill change it now see if it works!

saint_2008 said:

Its on my active sheet atm ill change it now see if it works!

Click to expand...

Still didn't work in the module?

Make sure that events are enabled. In the code window press CTRL + G to open the Immediate Window and type in

Application.EnableEvents = True

and press Enter.

By the way, the code as written will play a sound if S41 is >99 and any cell is changed. Is that what you want to happen?

VoG II said:

Make sure that events are enabled. In the code window press CTRL + G to open the Immediate Window and type in

Application.EnableEvents = True

and press Enter.

By the way, the code as written will play a sound if S41 is >99 and any cell is changed. Is that what you want to happen?

Click to expand...

I want it to play only if 1 cell S41 goes above 99.

did you see my previous comment asking is it also possible to make it so it does multiple values maybe with different sounds?

iv also enabled Application.EnableEvents = True and will try now with the code.

Still no luck at all getting the wav to play. I though this was so simple to do! I guess I was wrong! NO! lol

It works for me. This should do what you want (if you can get the sounds to play!). Note that I changed the filenames and path of the .wav files.