Ken weiß, wie man bedingte Formate in Excel erstellt. Was er jedoch wirklich tun möchte, ist, dass Excel ein hörbares Geräusch (ein Piepton oder was auch immer) macht, wenn die Bedingungen erfüllt sind.

Es gibt keine Möglichkeit, dies zu tun, ohne auf Makros zurückzugreifen. Wenn Sie nur einen Piepton erzeugen möchten, können Sie Folgendes verwenden:

Function BeepMe() As String     Beep     BeepMe = ""

End Function

Diese benutzerdefinierte Funktion besteht lediglich darin, einen Sound abzuspielen (der je nach verwendetem System variiert) und dann eine leere Zeichenfolge zurückzugeben.

Sie können die Funktion in Ihrem Arbeitsblatt folgendermaßen verwenden:

=IF(A12>300,BeepMe(),"")

Wenn Sie einen anderen Sound als den Standard-Systemton abspielen möchten, müssen Sie die Windows API PlaySound-Funktion verwenden. Der folgende Code erstellt eine benutzerdefinierte Funktion, die die Standardeinstellung „tada“

wiedergibt klingt in vielen Windows-Versionen so verbreitet.

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

Function SoundMe() As String     Call PlaySound("c:\windows\media\tada.wav", _       0, SND_ASYNC Or SND_FILENAME)

SoundMe = ""

End Function

Diese Funktion kann wie im vorherigen Beispiel aufgerufen werden:

=IF(A12>300,SoundMe(),"")

Wenn Sie eine andere WAV-Datei abspielen möchten, ändern Sie einfach die Dateispezifikation in der SoundMe-Funktion.

Beachten Sie, dass der Code in ein eingefügtes Modul im VBA-Editor eingegeben werden muss, damit die Funktion ordnungsgemäß funktioniert.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (5834) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365. Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier:

Bedingt einen Ton erzeugen.