Sheets ausblenden
10.04.2003 08:22:18
ThomasS.
ich habe folgendes Problem:
Ich möchte in meinem Workbook beim Starten alle bis auf ein bestimmtes Sheet ausblenden, über buttons können dann die einzelnen sheets eingeblendet werden. Beim speichern und schliessen werden wieder alle bis auf das erste sheet ausgeblendet. Mit zwei Sheets bekomme ich das hin über
Sheets("Sheet1").Visible = True
Sheets("week 16").Visible = False
und umgekehrt. Allerdings habe ich jetzt mehrere Sheets, deren Name sich oft ändert, daher möchte ich die sheets nicht alle einzeln aufzählen. Ich bräuchte also so etwas wie
"Blende Sheet 1 ein und alle anderen aus" und umgekehrt.
Vielen Dank für Eure Hilfe....