Spalten kopieren, mit Zeilenhöhe einf.

Bild

Betrifft: Spalten kopieren, mit Zeilenhöhe einf.
von: Hermann
Geschrieben am: 13.11.2015 14:27:37

Hallo zusammen,
der n. a. Code fügt mir ein neues Tabellenblatt hinter der Tabelle "Urlaub" ein. Die Sp. 1-22 werden vom Tabellenblatt "Urlaub" kopiert und ins neue Blatt eingefügt.
Zuzüglich werden immer drei Spalten ab Sp. 23, also 23-25 kopiert u. eingefügt.
Dies funktioniert.
Leider wird nur die Spaltenbreite mit kopiert.
Frage:
Wie muß ich den Code umstellen, daß auch die Zeilenhöhe mit kopiert wird?
Userbild
Gruß, Hermann

Bild

Betrifft: AW: Spalten kopieren, mit Zeilenhöhe einf.
von: Luschi
Geschrieben am: 13.11.2015 17:02:26
Hallo Hermann,
bei mir klappt das so:
wksDat.Rows("23:23").RowHeight = wksScr.Rows("23:23").RowHeight
wksDat.Rows("24:24").RowHeight = wksScr.Rows("24:24").RowHeight
wksDat.Rows("25:25").RowHeight = wksScr.Rows("25:25").RowHeight
Wenn alle 3 Zeilen die gleiche Höhe haben, dann geht das auch so:
wksDat.Rows("23:25").RowHeight = wksScr.Rows("23:25").RowHeight
Gruß von Luschi
aus klein-Paris

Bild

Betrifft: AW: Spalten kopieren, mit Zeilenhöhe einf.
von: Hermann
Geschrieben am: 13.11.2015 21:52:54
Hallo Luschi,
funktioniert leider nicht!

Bild

Betrifft: AW: Spalten kopieren, mit Zeilenhöhe einf.
von: Luschi
Geschrieben am: 14.11.2015 07:04:19
Hallo Hermann,
das glaube ich nicht,
in meinem, Beispiel klappt das herrlich.
Gruß von Luschi
aus klein-Paris

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Spalten kopieren, mit Zeilenhöhe einf."