Hallo,
ich komme leider mit Makro Recorder und Foren durchstöbern nicht weiter - folgendes Problem:
Ich habe eine Tabelle mit Kopfzeile - in Spalte H stehen sortiert zwei Namen, d.h. zuerst alle Zeilen mit dem ersten Name und dann mit dem zweiten.
Nun soll die Kopzeile in Zeile 1 über die Zeile, wo zum ersten Mal der zweite Name auftaucht, dorthin kopiert werden um die Tabelle automatisch zu teilen.
Untenstehend mein diletantischer Code - wie muss ich den Code verändern?
Dim i As Long
For i = 1 To Range("H65536").End(xlUp).Row
If Range("H" & i).Value = "Form" Then Rows("1:1").Select
Selection.Copy
Range(i).Select (hier tritt der Fehler auf!)
ActiveSheet.Paste
Next i
Danke und Gruss
Alex