Zeilen per Makro ausblenden
28.03.2007 12:51:54
Norbert
In einem Excelsheet gibt es 12 Tabellenblätter, Januar bis Dezember. In ihnen sollen (in Abhängigkeit bestimmter Parameter) die Zeilen von x bis y ausgeblendet werden.
Mein Makro läuft ohne Fehlermeldung, allerdings blendet es nur im ersten Blatt ("Januar") die _
Zeilen wie gewünscht aus. Das Makro sieht so aus :
Sub ausblenden()
Windows("XYZ.xls").Activate
Sheets(Array("Januar", "Februar", "März", "April", "Mai", "Juni", "Juli", "August", _
"September", "Oktober", "November", "Dezember")).Select
Sheets("Januar").Activate
Rows("100:150").Select
Selection.EntireRow.Hidden = False
Sheets("Januar").Select
End Sub
Daraufhin habe ich das Makro per Recorder aufgezeichnet (die interaktive Aufzeichnung funktioniert natürlich) und anschließend ablaufen lassen. Ergebnis : es werden wiederum nur im Januar die angegebenen Zeilen ausgeblendet.
Natürlich kann ich das Problem auch in einer Schleife lösen; es würde mich dennoch interessieren, worin das Problem besteht. Kann mir das jemand erklären ?
Danke für Eure Hilfe im voraus
Norbert