Zeilenhöhe
10.05.2007 08:10:00
serge
ich möchte in einer Tabelle alle Zeilenhöhen auf die höchste die ich mit Autofit erreicht habe stellen!
Wie soll das VBA aussehen
Private Sub Worksheet_Change(ByVal Target As Range)
Application.Goto Reference:="report"
Selection.Rows.AutoFit
'dann das einstellen der ganzen Tabelle auf das max.
End Sub
Danke für die Hilfe
Serge
Anzeige