Bob,

The error you are getting sound as though you have something declared twice,
hence the ambiguous.

However, you also have a couple of other problems. If you have the PlaySound
API declared in Module 1, it needs to be Public not Private to be accessed
from other modules. Also, the Constants SND_ASYNC and SND_FILENAME are
being referenced in Sheet8, they need to be declared there, not in Module 1.
I would suggest just moving all of the Module 1 code to Sheet8, and removing
Module 1.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Bob" wrote in message
...
Here is what I have done.

I have this in Module 1:

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

And have this in sheet 8:

Private Sub CommandButton1_Click()
WAVFile =
"C:/Program/Files/Netscape/Communicator/Program/AIM/Sounds/dooropen.wav"
Call PlaySound(WAVFile, 0&, SND_ASYNC Or SND_FILENAME)
End Sub

Then the error: Ambigous Name detected

Im sorry I don't understand.