Hello, I would like to create a macro that will:

1) play a WAV file
2) wait 5 seconds
3) play the WAV file again
4) wait 10 seconds
5) play the WAV file again
6) wait 5 seconds
7) play the WAV file again

Thanks!!!

Which part do you need help with.

For the "wait" use
application.ontime

--
Tim Williams
Palo Alto, CA


"One-Leg" wrote in message
...
Hello, I would like to create a macro that will:

1) play a WAV file
2) wait 5 seconds
3) play the WAV file again
4) wait 10 seconds
5) play the WAV file again
6) wait 5 seconds
7) play the WAV file again

Thanks!!!

Basically, I would like to know the code to play a WAV file and also the code
to have a delay between 2 commands

"Tim Williams" wrote:

Which part do you need help with.

For the "wait" use
application.ontime

--
Tim Williams
Palo Alto, CA


"One-Leg" wrote in message
...
Hello, I would like to create a macro that will:

1) play a WAV file
2) wait 5 seconds
3) play the WAV file again
4) wait 10 seconds
5) play the WAV file again
6) wait 5 seconds
7) play the WAV file again

Thanks!!!

I FINALLY FOUND IT!!! I need to run this "sound()" macro and it works...

Declare Function sndPlaySound32 Lib "winmm.dll" Alias "sndPlaySoundA" _
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Sub PlaySound()
Call sndPlaySound32("C:\Sound.wav", 0)
End Sub
Sub sound()
Call sndPlaySound32("C:\Sound.wav", 0)
Application.OnTime Now + TimeValue("00:00:05"), "PlaySound"
End Sub