Mit der folgenden Routine können Sie Wave-Dateien abspielen:

Fügen Sie neues Modul ein.
Fügen Sie folgenden Code ein:

'Excel 5.0/95
Declare Function sndPlaySound Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName _
As String, ByVal uFlags As Long) As Long

Sub PlayWave()
  Call sndPlaySound("c:\winnt\media\Der Microsoft Sound.wav", 1)
End Sub

'Excel 97/2000
Declare Function sndPlaySound32 Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName _
As String, ByVal uFlags As Long) As Long

Sub PlayWave()
   Call sndPlaySound32("c:\winnt\media\Der Microsoft Sound.wav", 1)
End Sub

Den Dateinamen der Wave-Datei passen Sie bitte entsprechend an.

Die nachfolgende Beispiel-Datei zeigt Ihnen,
wie Sie die Soundfunktion beim Klicken in eine beliebige Zelle anwenden können.
Aufgerufen wird dies wie folgt:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
   Call PlayWave
End Sub