VBA-Code anpassen
12.11.2014 16:31:28
Fritz_W
mit nachfolgendem Makro wird das angegebene Lied (hier: Lied_1.wav)gespielt.
Die WAV-Datei muss sich demzufolge im angegebenen Ordner c:\Lieder befinden.
Ich würde nun gerne den Code dahingehend geändert haben, dass sich die WAV-Datei immer im gleichen Ordner befindet, wie die Excel-Datei,in der das Makro verwendet wird.
Für Eure Unterstützung im Voraus besten Dank.
mfg
Fritz
Hier der Code:
Public Sub Play_Sound()
Static blnPlay As Boolean
If Not blnPlay Then
sndPlaySound "C:\Lieder\Lied_1.wav", SND_ASYNC Or SND_NODEFAULT
Else
sndPlaySound "NULL", SND_ASYNC
End If
blnPlay = Not blnPlay
End Sub