Neue Spalte in Excel Sheet einfügen mit VBA

Question

Wie kann ich eine neue Spalte in ein Excel Sheet mit VBA einfügen?

Answer 1

Um eine Spalte in ein Worksheet einzufügen kannst du die Insert Methode auf das Columns Objekt anwenden.

Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet1") 
    
ws.Columns(2).Insert ' 2 steht für die zweite Spalte
    
ws.Cells(1, 2).Value = "Topic" ' Setze den Spaltenkopf
    
ws.Cells(2, 2).Value = "Daten in Zeile 2"
ws.Cells(3, 2).Value = "Daten in Zeile 3"