ich habe mal wieder eine Frage.
Es soll sich ein Pop-up Fenster öffnen, wenn in einer der Zellen C8:N8 der Wert
10000 oder größer erscheint.
Die Zellen C8 :N8 sind mit einer Formel hinterlegt(z.B.für C8 =Summe C10:C20)
Folgende Formel habe ich gefunden, die jedoch nicht zum Ergebnis führt.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C8:N8")) Is Nothing Then
If Target.Count = 1 And Target => 10000 Then
MsgBox "Das Spiel ist beendet!", vbInformation, "Hinweis für " & _
Application.UserName
End If
End If
End Sub
Wie müsste die umgeschrieben werden?Grüße
Rolf