Hallo zusammen

Folgende Fragen:
 

Private Sub Worksheet_Change(ByVal Target As Range)
For Each zelle In Range("L8:M10")
 If zelle.Value = "NB" Then
 MsgBox "Begründung warum keine benötigt wird unter Bemerkungen eintragen.", vbOKOnly + vbInformation, "Sicherheitsschulung nicht benötigt!"
 End If
 
 If zelle.Value = "NEIN" Then
 MsgBox "Es wird eine Schulung oder ein Refresh benötigt." & "" _
 & vbCrLf & "Kontaktperson darüber informieren und die entsprechenden Dokumente vorbereiten.", vbOKOnly + vbInformation, "Sicherheitschulung nicht vorhanden / abgelaufen!"
End If
Next
End Sub

Mit diesem Code öffnet sich bei erkennen von NB oder Nein die Messagebox.

Es soll aber immer nur die aktive Zelle kontrolliert werden. Wenn ich jetzt schon im festgelegten Bereich ein Nein habe und in einer neuen Zeile nochmals ein Nein, wird mir immer für beides die Msgbox angezeigt.

Danke für eure Hilfe