ich würde gerne den Blattname mit dem Zellwert vergleichen. Wenn ungleich dann soll das Blatt angezeigt werden.
Kann da jemand helfen?
Gruß Andi
With Worksheets("MeinBlatt")
If .Range("A1").Value = "MeinBlatt" Then
.Visible = xlSheetVisible
Else
.Visible = xlSheetVeryHidden
End If
End With