Office: VBA-Makro funktioniert nicht zum Autofill einer Formel

Hallihallo,

hat jemand eine Idee, was an diesem Makro falsch ist?

Es lautet folgendermaßen:

Sub Makro14()
Dim Bereich As Range
With Sheets("Hilfstabelle")
Set Bereich = .Range("A2:A" & .Range("C65536").End(xlUp).Row)
.Range("F2").Formula = "=COUNTIF(C$2:C2,C2)"
.Range("F2").AutoFill Destination:=Bereich
End With
End Sub

Es kommt ein Laufzeitfehler 400. Der Fehler liegt in der Zeile:
.Range("F2").AutoFill Destination:=Bereich

"Laufzeitfehler 1004
Anwendungs- oder objektorientierter Fehler."

In meiner Tabelle Sheet "Hilfstabelle" gibt es jedoch Werte...
die Spalte C verfügt auch über ausreichend werte... Was ist da los?

Liebe Grüße

 

Hallo!

"Bereich" wird in Spalte A definiert, ausfüllen möchtest du die Formel aber in Spalte F!

 

DANKE

DANKE !!! Supernett.