optimale Zeilenhöhe plus 20
05.01.2007 12:19:19
Korl
ich habe meine Zellen im Tabellenblatt auf optimale Zeilehöhe formatiert.
Nun möchte ich jeweils die aktive Zelle so formatieren, dass zu der optimalen Zeilenhöhe, sagen wir um den Wert 20 erhöht wird.
Mein Versuch ist leider gescheitert.
Sub Zeilenhöhe()
ActiveCell.Rows.AutoFit +20
End Sub
Wie müßte der Syntax hierfür wohl aussehen?
Gruß Kortl
Anzeige