activesheet veryhidden
16.01.2004 14:13:50
HaJü
in einer Mappe habe ich mehrere Tabellenblätter markiert und will sie mit
Sub Sheets_unsichtbar()
Application.ScreenUpdating = False
With ThisWorkbook
Activeselection.Visible = xlSheetVeryHidden
End With
Application.ScreenUpdating = True
End Sub
ALLE veryhidden.
Dummerweise springt Thisworkbook immer in das nachfolgende TB
Wer kann mir einen Tipp geben