Um eine Tabelle vor neugierigen Augen zu schützen,
können Sie sie so ausblenden, dass sie über den normalen Wege
nicht mehr einzublenden ist.
Sub Blatt_ausblenden()
Worksheets("Tabelle1").Visible = xlVeryHidden
End Sub
Die Tabelle1 ist somit ausgeblendet und kann nur noch mit
einem Makro eingeblendet werden.
Der übliche Weg über "Format" - "Blatt" - "Einblenden" ist
nicht möglich.
Sub Blatt_einblenden()
Worksheets("Tabelle1").Visible = True
End Sub
|