AutoFill funktioniert nicht
09.06.2014 17:15:37
peter
Hey Leute,
ganz schnelle Frage, denn ich habe folgendes Problem:
Dim strMaxrow as String
strMaxrow = Worksheets("Tabelle1").Range("B1").End(xLDown).Row
With Worksheets("Tabelle1")
.Range("C1").FormulaLocal = "=WENN(B2="""";"""";JAHR(B2))"
.Range("C1").AutoFill Destination:=Range("C1:C" & strMaxrow & "")
End With
Jetzt sagt er mir "Die AutoFill-Methode des Range-Objekts konnte nicht ausgeführt werden." ... Was ist da los? :(
Danke for Feedback!
Gruß
Pete