Exce: VB-Befehl, um einen Bereich von Zellen von einem Blatt zu einem anderen Blatt

Question

zu kopieren Ich habe 2 Blätter (Rechner & Backupschedule) in der gleichen Datei und ich übertrage Daten hin und her zwischen den Blättern.

Ich habe Probleme herauszufinden, wie Sie eine Reihe von Zellen vom Rechnerblatt zum anderen übertragen.

Mein aktueller VB-Code ist:

Sheets("Calculator").Range("R3:R15").Copy Destination:=Sheets("BackupSchedule").Range("E8:E20") 

aber ich erhalte eine #REF! Fehler im Backup-Plan in den Zellen E8: E20.

Ich möchte die Zellen in Spalte R, Zeile 3 bis 15 (Zellen: R3, R4, R5, usw.) kopieren und sie dann in Spalte E Zeilen 8 bis 20 (Zellen: E8, E9, E10, usw.))

Kann mir bitte jemand eine Hand geben?

Answer 1

Sie erhalten die #Ref, weil Sie Formeln mit Referenzen kopieren, die beim Einfügen in eine frühere Spalte in Bezug auf die Stelle, an der Sie sie einfügen, nicht in der Tabelle enthalten sind.

Wenn ich eine Formel in C4 =A1 habe, wenn ich kopiere und in D5 einfügen, wird es =B2 werden. Wenn ich versuche, die Kopie in B3 einzufügen, ist die Referenz nicht mehr gültig, da sie jetzt versucht, auf eine Zelle außerhalb des Blattes zu verweisen.

Ich vermute, dass Sie nur die Werte an diesem Punkt wollen. Es gibt ein paar Methoden, um die Werte in die gewünschten Zellen zu bekommen.

können Sie kopieren und nur die Werte einfügen:

Sheets("Calculator").Range("R3:R15").Copy 
Sheets("BackupSchedule").Range("E8:E20").PasteSpecial xlValues 

Sie können direkt die Werte zuweisen (empfohlen)

Sheets("BackupSchedule").Range("E8:E20").Value = Sheets("Calculator").Range("R3:R15").Value 

Oder Sie können im Bereich setzen Formeln, die auf die ursprüngliche beziehen:

Sheets("BackupSchedule").Range("E8:E20").Formula = "=Calculator!R3"