Zeile automatisch nach Text anpassen



Excel-Version: 10.0 (Office XP)
nach unten

Betrifft: Zeile automatisch nach Text anpassen
von: Harald
Geschrieben am: 29.06.2002 - 14:36:58

Hallo Excel Forum,
wenn ich die Zeilenhöhe nicht ändere past sich die Zelle automatisch dem Text an ich möchte aber eine mindest Zeilenhöhe die 25 ist haben es kommt aber auch vor das mehr Text vorhanden ist wenn möglich auch mit vba.

Gruß Harald

Vielen Dank für eure Antworen


nach oben   nach unten

Re: Zeile automatisch nach Text anpassen
von: Martin Beck
Geschrieben am: 01.07.2002 - 17:27:59

Hallo Harald,

versuche mal:


Sub Zeilenhöhe_mindestens_25()
For Each r In ActiveSheet.UsedRange.Rows
    If r.RowHeight < 25 Then r.RowHeight = 25
Next
End Sub

Gruß
Martin Beck

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Zeile automatisch nach Text anpassen"