...146...


Tabellenblatt ausblenden
Sub Ausblenden()
   Worksheets("Tabelle1").Visible = False
End Sub

 


Alle Tabellenblätter einblenden
Sub Einblenden()
Dim i As Integer
   For i = 1 To Sheets.Count
      Sheets(i).Visible = True
   Next i
End Sub

 

by Monika Weber