Tom,
Thanks for your response. Yeah, it did not work and the post was gone on
my end so I thought I would just repost. I appreciate your help.
Unfortunately, your code did not work. I guess it is possible I did
something wrong on my end but I don't think so. Below is the code you
suggested. Any other suggestions would be helpful and very much appreciated.
yobeee
Sub StopMe1()
Const SND_PURGE = &H40
Dim retval As Long
retval = PlaySound(vbNullString, _
0, SND_PURGE = &H40)
End Sub