ich habe eine Ausgangsliste und diese muss umformatiert werden, damit die Liste in ein Programm eingepflegt werden kann dies will ich mit VBA lösen.
Ich habe also meine Ausgangsliste mit mehreren gefüllten Spalten.
Nun benötige ich nicht alle Spaltenwerte, die überflüssigen müssen also gelöscht werden.
Desweiteren müssen nun die Spaltenköpfe angepasst werden.
Das bekomm ich soweit hin, vor diesen Schritten muss ich aber noch aus ein paar Spalten die Werte in andere Spalten schieben/kopieren bevor ich sie lösche da die Werte in den Spalten die übrig bleiben stehen sollen und hier weiss ich nicht weiter.
Mein aktueller Code:
Sub DelCol()
Dim Bereich As Range
Set Bereich = Union(Columns(1), Columns("C:D"), Columns("F:K"), Columns(14), Columns("P:Q"))
Bereich.Delete
Range("A1").Value = "buchung-betrag"
Range("B1").Value = "buchung-datum"
Range("C1").Value = "buchung-kontonummer"
Range("D1").Value = "buchung-name"
Range("E1").Value = "buchung-zweck1"
End Sub
Ich weiss auch nicht ob das so optimal gelöst ist wenn man das besser lösen kann bin ich für Vorschläge offen.
Wenn noch Fragen offen sind einfach Fragen und schonmal vielen Dank für die Antworten.
Viele Grüße
Dieter