ich habe vor ein paar Tagen von Rudi Mantaire einen Code zum usergesteuerten einblenden von Shapes erhalten und wollte dies heute auch für Worksheets umsetzen:
Private Sub Workbook_Open()
With Worksheets("START")
.Visible = _
Not IsError(Application.Match(IIf(IsNumeric(Environ("Username")), _
Environ("Username") * 1, Environ("Username")), Sheets("SETT").Range("A1:A2"), 0))
End With
End Sub
Ich habe aber festgestellt, daß das ausgeblendete WS über Format-Blatt-Einblenden wieder eingeblendet werden kann. Wie muß der Code geändert werden, damit dies unterbunden wird (also xlveryhidden)?Vielen Dank für Eure Hilfe.
Gruß
Torsten