habe eine Worksheet, möchte den Namen prüfen.
Der Name steht in Zelle "D2"
Wenn also der Name nicht mit "D2" übereinstimmt soll eine MSGBOX kommen,
"Falscher Name", sonst Name Richtig!
gruß Walter MB
Private Sub Worksheet_Activate()
Select Case ActiveSheet.Name
Case Is = Range("D2").Value
MsgBox "Name Richtig"
Case Else
MsgBox "Name Falsch"
End Select
End Sub