Mehrere Spalten per VBA auf optimale Breite stellen

07. Januar 2011
Martin Althaus Von Martin Althaus, Excel, Office ...

So optimieren Sie die Spaltenbreite in einem Makro

Durch einen Doppelklick auf den Bereich zwischen zwei Spaltenbuchstaben oder das passende Excel-Kommando können Sie für eine Spalte die Einstellung "Optimale Breite" vornehmen.

Wenn Sie das in einem Makro erledigen möchten, hilft Ihnen dabei die Funktion AutoFit. Es gibt verschiedene Möglichkeiten, diese Funktion auf ein Range-Objekt anzuwenden. Hier ist eine davon:

Sub PasseSpaltenbreiteAn()
Range("a:c").EntireColumn.AutoFit
End Sub

Die folgende Abbildung zeigt, wie das Ergebnis aussehen kann, nachdem Sie das Makro gestartet haben:

Der Range-Befehl im Makro verwendet keine Zeilennummern. Sie können ihn aber auch mit Zeilennummern verwenden. Dann werden sie von Excel ignoriert.

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

  • Excel Vorlagen zum Sofort-Download
  • Geprüfte Vorlagen zum Sofort-Einsatz
  • Gratis Makros & Add-Ins im Downloadcenter

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.

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"