Excel VBA "Automatische Ausfüllung der Bereichsklasse fehlgeschlagen"

Der folgende VBA-Code (Excel 2007) schlägt mit dem Fehler 1004 "Fehler beim automatischen Ausfüllen der Bereichsklasse" fehl. Kann mir jemand sagen, wie man es repariert?

Dim src As Range, out As Range, wks As Worksheet

Set wks = Me
Set out = wks.Range("B:U")
Set src = wks.Range("A6")
src.AutoFill Destination:=out

(Anmerkung: Ich habe dafür gegoogelt, usw.) Es kommt ziemlich oft vor, aber alle Antworten, die ich gesehen habe, hatten mit fehlerhaften Bereichsadressen zu tun, was AFAIK nicht mein Problem ist.

Auf Vorschlag von jemandem habe ich versucht, die Zeile für das automatische Ausfüllen durch Folgendes zu ersetzen:

src.Copy out

Dies hatte den Effekt, meine Excel-Sitzung in eine scheinbare Endlosschleife zu werfen, die 100% der CPU verbraucht und dann für immer hängen bleibt.

OK, anscheinend muss die Quelle Teil des Zielbereichs für das automatische Ausfüllen sein. Mein Code sieht nun so aus:

Dim src As Range, out As Range, wks As Worksheet

Set wks = Me
Set out = wks.Range("B1")
Set src = wks.Range("A6")
src.Copy out

Set out = wks.Range("B:U")
Set src = wks.Range("B1")
src.AutoFill Destination:=out, Type:=xlFillCopy

Gleicher Fehler in der letzten Zeile.

Antworten auf die Frage(4)

Ihre Antwort auf die Frage