Einzelne Tabellen ausblenden
20.08.2008 22:33:32
Peter
hab folgendes Problem. Ich habe eine Arbeitsmappe mit 15 Arbeitsblättern. Von diesen 15 AB sollen jedoch nur die Tabellen 1-10 sichtbar sein. Der Code, den ich mir gebastelt habe funktioniert leider nicht. Vielleicht stehe ich auch einfach nur auf dem Schlauch.
Hier der Code:
Sub EinblendenSeiten()
Dim iWks As Integer
For iWks = 1 To 10
Sheets("iWks").Visible = True
Next iWks
End Sub