Wenn ein Ergebnis in eine Zelle der Spalte D3:D1000 geschrieben wird soll es einen Ton geben.
Geht das als Makro?
Vielleicht könnt ihr mir helfen?
Danke!
Gruß
Rolf
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("D3:D1000")) Is Nothing Then
Call sndPlaySound32("C:\WINNT\media\ringin.wav", 1)
End If
End Sub
Den Pad und Dateinamen der WAV-Datei anpassen.
Gruß
Martin
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("D3:D1000")) Is Nothing Then
Beep
End If
End Sub
Gruß
Martin