Run-time error question
 

I have code in excel that works fine on one machine, but when I try to run it
on another machine I get:
run-time error '453' Can't find DLL entry point PLAYSOUNDA in WINMM.dll

Both machines are running 2000 Pro. On the machine that works, I am using
Excel 2000. On the one that doesn't, I am using Excel 2003.

What can I do to make it work?
This is the code:

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

Public Function PlayWavFile(WavFile As String) As String
Const SND_ASYNC = &H1
Const SND_FILENAME = &H20000
PlaySound WavFile, 0, SND_ASYNC Or SND_FILENAME
PlayWavFile = ""
End Function