Hallo liebe Community,

ich möchte gerne in Excel, über eine Schaltfläche, eine Tabelle einfügen. Mit dem aktuellen Code funktioniert dies auch schon, allerding wird dabei die Spaltenbreite automatisch angepasst. Also nun meine Frage, ist es möglich das man für jede einzelne Spalte eine definierte Breite einstellen kann?

Sub TabelleEinfügen()
    ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=4, NumColumns:= _
        4, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
        wdAutoFitFixed
    With Selection.Tables(1)
        If .Style <> "Tabellenraster" Then
            .Style = "Tabellenraster"
        End If
        .ApplyStyleHeadingRows = True
        .ApplyStyleLastRow = False
        .ApplyStyleFirstColumn = True
        .ApplyStyleLastColumn = False
        .ApplyStyleRowBands = True
        .ApplyStyleColumnBands = False
    End With
End Sub

Ich freue mich über jede Antwort!

Mit freundlichen Grüßen

Lukas Möller