ich habe den folgenden Change-Ereignis-Code der zwar funktioniert aber nicht so wie ich mir das wünsche. Der Code soll folgendes machen: Wenn in dem Zellbereich B1:B3 der text "fet" vorkommt und gleichzeitig in dem Bereich A1:A3 die Zahl kleiner 590 ist, soll er eine msg box öffnen mit zahl muss größer 590 sein. Jetzt führt es das Makro aber aus sobald z.B. in B1 fet steht und in a2 eine Zahl kleiner 590 steht. Es soll aber erst ausgeführt werden wenn in a2 eine Zahl kleiner 590 und in b2 fet steht. Und das soll dann auch für a1 und b1 sowie für a3 und b3 gelten. Dann soll der Nutzer einen Hinweis bekommen.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A1:A3")) Is Nothing Then
If Worksheets("tabelle4").Range("a1").Value 0 Then
MsgBox ("Zahlu muss größer 590 sein!")
End If
End If
End Sub
gruß dominik