Hallo Nobody,
eine mögliche Vereinfachung, wäre so:
rngTarget.PasteSpecial xlPasteAll, , , True
Für unbedarfte, welche die Funktion mal nachbauen, erklärt sich dies nicht unbedingt. Zumal es nur bei optionalen Parametern möglich ist.
Gruß Uwe