wie kann ich per VBA die Zeilen zwischen der letzten belegten Zeile (Betrifft nur Spalte A) und Zeile 105 ausblenden und wieder einblenden?
Gruß
Carsten
Sub ausblenden()
Rows("10:15").Select
Selection.EntireRow.Hidden = True
Range("A1").Select
End Sub
Sub einblenden()
Rows("10:15").Select
Selection.EntireRow.Hidden = False
Range("A1").Select
End Sub
Probier mal dieses Makro:
Sub einblenden()
Zeile = 1
Do Until IsEmpty(Cells(Zeile, 1))
Zeile = Zeile + 1
Loop
Rows(Zeile & ":104").Hidden = True
End Sub
Gruss Remo
das funktioniert solange ich einen festgelegten Bereich ein bzw. ausblende. Ich habe aber eine Tabelle bei der die Anzahl der Daten in Spalte A variabel ist. Ich möchte jetzt den Bereich zwischen der letzten gefüllten Zeile und Zeile 105 ausblenden.
Gruß
Carsten
meinst Du sowas?
Gruß
Christian
hab das ein bisserl falsch gelesen - sorry
gruss michael
das ausblenden funktioniert, das einblenden habe ich umgestrickt auf:
Sub zeigen()
Rows("1:65536").EntireRow.Hidden = False
End Sub
Danke
Carsten