|
Hallo,
ich bin blutiger Anfänger und scheitere an einer wahrscheinlich simplen Herausforderung für alle hier. Ich wage es trotzdem:
Problemstellung und Aufgabe:
Habe in Excel in nur einer Spalte A untereinander 370 Adressen die sich jeweils auf 3 Zeilen verteilen:
Zeile 1 Vorname Kunde 1
Zeile 2 Nachname Kunde 1
Zeile 3 Adresse Kunde 1
Zeile 4 Vorname Kunde 2
...usw bis Kunde 370
Aufgabe: benötige diese Adressen für die Serienbrief-Funktion verteilt auf 3 Spalten: Also neu 370 Zeilen mit 3 Spalten Vorname / Nachname / Adresse
Wollte das mit einem Makro lösen. Habe Makro für 1. Kunden angelegt, scheitere aber jetzt an der Wiederholung.
Wie programmiert man sowas oder löst es anders?
Bitte um Eure Hilfe. Danke
Anbei mein bescheidenes Makro bisher:
Sub Umformatieren()
'
' Umformatieren Makro
'
' Tastenkombination: Strg+u
'
Range("A2").Select
Selection.Copy
Range("F2").Select
ActiveSheet.Paste
Range("A3").Select
Application.CutCopyMode = False
Selection.Copy
Range("H2").Select
ActiveSheet.Paste
Range("A4").Select
Application.CutCopyMode = False
Selection.Copy
Range("I2").Select
ActiveSheet.Paste
End Sub
Hilfe. Danke.
Beste Grüße
Andreas
|