In diesem Beispiel wird der Bereich A1:A10 in Sheet1 mit dem Inhalt der Zelle A1 gefüllt.
Worksheets("Sheet1").Range("A1:A10").FillDown