Spaltenbreiten und Zellenhöhe kopieren
Hugo
Habe eine Makro geschrieben, das einen Bereich bestimmt der dann in einen anderen Register kopiert werden soll. Soweit ist alles kein Problem. Aber wie kann ich die Spaltenbreiten und die Zeilenhöhen kopieren.
Range(ActiveCell.Offset(Startzeile - 1, 0), ActiveCell.Offset(LetzeZeile - 2, 17)).Copy ' Bereich der kopiert wird
Sheets("101").Cells(1, 1).PasteSpecial Paste:=xlAll 'in Register 101 kopieren
' Nun sollten noch die Spaltenbreiten und Zellenhöhen kopiert werden
Aber wie?
Besten dank im Voraus und Gruss
Hugo