Private Sub? Was mache ich falsch?
19.08.2024 13:12:10
Sandra
ich hab ein Tabellenblatt auf dem ich eine Zelle überwache in der eine Formel steht und als Wert "sin", "cos" oder " tan" ausgibt.
Wenn der entsprechende Wert in der Zelle erscheint, soll eine MsgBox erscheinen, nur leider wird das Private Sub nicht angesprochen.
Ich hab es in das Modul (?) des entsprechenden Tabellenblattes geschrieben:
Private Sub Worksheet_Calculate()
Dim rngC As Range
For Each rngC In Range("AB12")
If rngC = "sin" Then
MsgBox "sin"
Else
MsgBox "TaDa"
End If
End SubVielleicht kann mir jemand von euch mal wieder helfen?!
VG
Sandra
Anzeige