Registriert seit: 04.06.2017
Version(en): 2016
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
Registriert seit: 06.09.2016
Version(en): 2016
Hallo Max,
du kannst nur den Wert einer Zelle in die andere schreiben.
Du brauchst also zwei Codezeilen.
Gruß,
Lutz
Registriert seit: 30.08.2014
Version(en): Office 365 - Beta 32 Bit
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.
________
Servus
Case
Folgende(r) 1 Nutzer sagt Danke an Case für diesen Beitrag:1 Nutzer sagt Danke an Case für diesen Beitrag 28
• Lucker11
Registriert seit: 04.06.2017
Version(en): 2016
Ahhh, okay, vielen Dank euch beiden für die schnelle Antwort!
Danke, Danke, Danke.
Grüße
Max