Hallo...
Gibt es irgendeine Möglichkeit, statt:
Rows("1:19").Select
Selection.RowHeight = 15.75
folgendes auszuführen.
Rows("1:19").Select
Selection.RowHeight = bis Unterkante (Oberkante Blattregisterkarten bzw. Sichtbereich).
Ich weiß, dass ich ähnliche Frage schon mal gestellt habe, aber vielleicht gibt es doch etwas in diese Richtung.
Gruß
Karsten