Zeilenhöhe automatisch per Makro anpassen

11. März 2009
Martin Althaus Von Martin Althaus, Excel, Office ...

Wie Sie die Zeilenhöhe per Makro auf die optimale Höhe setzen

Wenn Sie die Höhe einer Zeile an die Inhalte der Zellen anpassen möchten, ist das mit Excel kein Problem. Durch einen Doppelklick auf den Zwischenraum zwischen zwei Zeilen passen Sie die Zeilenhöhe der oberen Zeile auf eine Höhe an, mit der alle Inhalte darstellbar sind.

Aber wie machen Sie das per Makro? Setzen Sie den folgenden Programmcode ein:

Sub HoeheAnpassen()
ActiveSheet.Range("a1:a10").Rows.EntireRow.AutoFit
End Sub

Das Anpassen der Höhe von Zeilen brauchen Sie in Ihren Makros immer dann, wenn Sie per Makro Tabellen ablegen. Vor allem beim Einsatz von Zeilenumbrüchen in einer Zelle können Teile der Inhalte schnell unsichtbar werden, wie die folgende Abbildung zeigt:

Nach dem Start des Makros werden die Höhen der Zeilen 1 bis 10 der aktiven Tabelle auf die optimalen Werte gesetzt, damit alle Inhalte sichtbar werden. Die folgende Abbildung zeigt das Ergebnis:

Passen Sie den Bezug "a1:a10" im Makro an die Zeilennummern an, in denen Sie die Höhe optimieren möchten.

Welche Spaltenbezeichnungen Sie in dem Ausdruck verwenden, spielt keine Rolle, wichtig sind die Zeilennummern. Für eine Anpassung der Zeilen 200 bis 1000 können Sie daher beispielsweise auch den Ausdruck "c200:c1000" verwenden.

Werden Sie mit unseren Tipps zum Excel-Profi!

Jetzt gratis per E-Mail

DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"