Wie legt man die Spaltenbreite einer Excel-Tabelle mit VBA fest?

Aktualisiert: August 2023; Funktioniert auf Excel 365, 2019, 2016.

Im heutigen Tutorial zur Excel-Automatisierung lernen wir, wie Sie die Breite einer Arbeitsblattspalte nach Bedarf schnell ändern können – jedoch programmgesteuert mit VBA (Visual Basic for Applications).

Voraussetzungen

Um VBA-Code zu schreiben, müssen Sie in erster Linie sicherstellen, dass Ihr Entwickler-Tab aktiviert ist. Wenn Sie sich bezüglich des Verfahrens nicht sicher sind, lesen Sie unbedingt unser detailliertes Verfahren.

Schritte zur Aktivierung des Entwickler-Tabs

1. Öffnen Sie auf Ihrem Windows-Computer Microsoft Excel.
2. Klicken Sie im Hauptband auf Entwickler.
3. Drücken Sie den Visual Basic- Befehl. Dadurch wird der VBA-Editor geöffnet.
4. Wählen Sie im Projekt-Explorer auf der linken Seite ein bestimmtes Blatt, um Ihren Code einzufügen, oder fügen Sie ein neues Modul hinzu.

Einstellen einer Spaltenbreite

In diesem Beispiel wählen wir eine Spalte im aktiven Arbeitsblatt aus und ändern sie entsprechend. Hier sind die Schritte:

1. Kopieren Sie mit dem VBA-Editor den folgenden Code in Ihr Arbeitsblatt oder Modul.

Sub Set_Column_Width()
Dim MySheet As Worksheet
Set MySheet = ActiveSheet
' Wählen Sie eine oder mehrere Spalten aus, stellen Sie Ihre Spaltenbreite nach Bedarf ein
With MySheet.Columns("B")
    .ColumnWidth = 50
End With
End Sub

2. Führen Sie Ihren Code aus, indem Sie auf F5 drücken oder 'Run >> Run Sub or Form' auswählen.
3. Speichern Sie Ihre Arbeit: Klicken Sie auf Datei >> Speichern oder auf das Datenträgersymbol.

Ändern Sie die Breite eines mehrspaltigen Bereichs

In diesem Beispiel wählen wir eine Reihe von Spalten aus und ändern dann die Breite:

Sie können den Code auf die gleiche Weise wie im vorherigen Abschnitt beschrieben anwenden.

Sub Set_Column_Range_Width()
Dim MySheet As Worksheet
Set MySheet = ActiveSheet
' Stellen Sie Ihre Spaltenbreite nach Bedarf ein
With MySheet.Range("A:F")
    .ColumnWidth = .ColumnWidth * 1.5
End With
End Sub

Nächste Schritte

Mit VBA anfangen? Sehen Sie sich unbedingt den VBA-Grundlagen für Excel-Leitfaden an.

Zusammenfassung