Sheets ausblenden
16.06.2008 16:47:00
Rüdiger
ich habe folgendes Makro zusammengebastelt, um in meinem Workbook alle Sheets auszublenden.
Sub Ausblenden ()
For Each sh In ActiveWorkbook.Sheets
sh.Visible = False
Next
End Sub
Allerdings soll das Sheet mit dem Namen ("Übersicht") nicht ausgeblendet werden, also als einziges sichtbar bleiben. Ich weiß aber nicht, wie ich diesen Befehl in das Makro einbauen kann. Ich bin um jede Hilfe dankbar.
Gruß Rüdiger
Anzeige