Daten übertragen

Sub bereich()
Worksheets("Tabelle1").Range(Cells(11, 1), Cells(20, 10)).FormulaR1C1 = _
Worksheets("Tabelle1").Range(Cells(1, 1), Cells(10, 10)).FormulaR1C1
End Sub

... Werte von einem Bereich in einen anderen zu übernehmen.
Wenn ich die Werte in ein anderes Blatt schreiben möchte (s. Code unten), kommt nur eine Fehlermeldung ("Anwendungs- und objektdefinierter Fehler. Laufzeitfehler 1004").

Sub bereich()
Worksheets("Tabelle2").Range(Cells(11, 1), Cells(20, 10)).FormulaR1C1 = _
Worksheets("Tabelle1").Range(Cells(1, 1), Cells(10, 10)).FormulaR1C1
End Sub

Liegt's an mir oder am Code?
Danke im Voraus
Johann