Need help playing embedded wav/mp3 when condition is met

[1nk3d]

I need help with this spreadsheet. We cannot load the sound files on computers, so the files need to be embedded. They can be a wav or an mp3. The spreadshet is used to track projected hours for each store. Ideally we would like a cash register sound (green.wav) to play when the value is greater than 0, however the number is always greater than 0 as it counts down the hours, so unless there is a way to hide the value until all cells are completed?

What would probably be easier is to play a whammy sound of sort when the value is negative. I have it working, however it only works when my thumb drive is in the computer as th sound file is located there. So I need a file to point to the location of it on an embedded shet, maybe we can hide it?

I can't run any sort of script to temporarily put the file somewhere, as these are government computers....

Code:
[TABLE="width: 500"]
<tbody>[TR]
[TD]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_Calculate()
Const FName As String = "bad.wav"
If Range("I2").Value > 22.2 Then
Call PlaySound(FName, 0&, SND_ASYNC Or SND_FILENAME)
End If
End Sub
[/TD]
[/TR]
</tbody>[/TABLE]

 

[1nk3d]

Can't figure out how to edit, but in the above code, it lists 22.2 as the value, it should be less than 0. Sorry

 

[1nk3d]

Perhaps we can use, is it vytes? to move file temporarily to desktop, however, each user has a different log on id... Also would it be possible just to hyperlink the file?