Aktion ausführen bei Änderungen
30.09.2005 22:27:54
Pia
Ich möchte, wenn in Zelle X der Wert "Neu" steht, eine msgbox angezeigt wird:
Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(Target.Row, 25) = 1 Then
MsgBox "Die Spalte -alte Nettoprämie- wird nun wieder ausgeblendet!", 64 + 0, "Hinweis"
End If
End Sub
Soweit kein Problem, aber der Wert "Neu" wird nun per Dropdownfeld (Gültigkeit) ausgewählt, dabei springt dies nicht an!
Wie könnte ich das machen?
Danke!