Was ist an dieser Zeile falsch? Fehler 1004

[Lucker11]

Hallo zusammen,

ich bekomme bei dieser Zeile immer den Laufzeitenfehler 1004, kann mir jemand sagen warum?

Code:

Sheets("BlattA").Range(Cells(3, 4), Cells(3, 5)).Value = Sheets("BlattB").Range(Cells(5, 2), Cells(5, 3)).Value

Lg
Max

[Lutz Fricke]

Hallo Max,

du kannst nur den Wert einer Zelle in die andere schreiben.
Du brauchst also zwei Codezeilen.

Gruß,
Lutz

[Case]

Hallo,

du musst ausreichend referenzieren:

Code:

With Sheets("BlattA")
    .Range(.Cells(3, 4), .Cells(3, 5)).Value = Sheets("BlattB").Range(Sheets("BlattB").Cells(5, 2), Sheets("BlattB").Cells(5, 3)).Value
End With

Sonst weiß er nicht wo er was hinschreiben soll.

[Lucker11]

Ahhh, okay, vielen Dank euch beiden für die schnelle Antwort! 

Danke, Danke, Danke.

Grüße
Max