Hallo
wenn ein Range angegeben werden muss probiere es bitte so: (vielleicht muss man den Bereich um -1 verkleinern?) Bitte selbst testen!
SourceCol.Resize(LastRow - rng1.Row).AutoFill Destination:=TargetCol, Type:=xlFillDefault
mfg Nobody