Function sndPlaySound32 Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName _
As String, ByVal uFlags As Long) As Long
Public
Function MakroSound() As String
Call sndPlaySound32(ThisWorkbook.Path + "\Test.wav", 1)
MakroSound = ""
End Function
In Zelle B1 dann diese Formel:
=WENN(A1<8;MakroSound();"")
Hoffe das hilft weiter,
Andreas
Um eine WAV-Datei in Excel abzuspielen, kannst du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
Klicke im Menü auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.
Füge den folgenden Code in das Modul ein:
Declare Function sndPlaySound32 Lib "winmm.dll" _
Alias "sndPlaySoundA" (ByVal lpszSoundName As String, _
ByVal uFlags As Long) As Long
Public Function MakroSound() As String
Call sndPlaySound32(ThisWorkbook.Path + "\Test.wav", 1)
MakroSound = ""
End FunctionPasse den Pfad zur WAV-Datei an, indem du "\Test.wav" durch den tatsächlichen Pfad deiner WAV-Datei ersetzt.
Schließe den VBA-Editor und gehe zurück zu deinem Arbeitsblatt.
In Zelle B1 kannst du die folgende Formel eingeben:
=WENN(A1<8; MakroSound(); "")Diese Formel überprüft den Wert in Zelle A1. Wenn der Wert kleiner als 8 ist, wird die WAV-Datei abgespielt.
Fehler: WAV-Datei wird nicht abgespielt
Fehler: "Zugriff verweigert"
Wenn du keine VBA verwenden möchtest, gibt es auch andere Möglichkeiten:
1. Kann ich auch andere Audioformate abspielen?
Leider unterstützt die sndPlaySoundA-Funktion nur WAV-Dateien. Du kannst jedoch andere Formate mit externen Programmen abspielen.
2. Funktioniert das in jeder Excel-Version?
Ja, der VBA-Code sollte in Excel 2010 und neueren Versionen funktionieren. Stelle sicher, dass Makros aktiviert sind.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen