ich versuche die Zeilenhöhe über eine Definition der einzelnen Zeilen von einem Tabellenblatt auf alle anderen Tabellenblätter zu übertragen.
Mein Code:
sheets(wsheets).Select
Union(Rows("1:3"), Rows(22), Rows(25), Rows(33), Rows(35), Rows(43), Rows(45), Rows(53)).RowHeight = 13.2
sheets(wsheets).Select
Union(Rows(4), Rows(6), Rows(11), Rows(20), Rows("54:55"), Rows(23)).RowHeight = 30
sheets(wsheets).Select
Union(Rows(5), Rows("7:10"), Rows(12), Rows(21)).RowHeight = 21
sheets(wsheets).Select
Rows("13:19").RowHeight = 19.8
sheets(wsheets).Select
Union(Rows(22), Rows(24), Rows(34), Rows(44)).RowHeight = 7.2
sheets(wsheets).Select
Union(Rows("26:32"), Rows("36:42"), Rows("46:52")).RowHeight = 12.6
Leider wird nur das nächste Tabellenblatt angepasst und nicht alle, so wie gewünscht.
Kann jemand helfen?
Vielen Dank und Grüße
Max