Anzeige
Archiv - Navigation
360to364
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
360to364
360to364
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

kopieren von Arbeitsmappe zu Arbeitsmappe

kopieren von Arbeitsmappe zu Arbeitsmappe
13.01.2004 13:55:53
Joachim
Hallo excel-user,
ich kopiere zum Datenabgleich Zellbereiche von einer Arbeitsmappe zur Andern.
Beim Kopieren inerhalb einer Arbeitsmappe geht es mit
Sheets(1).Range("A1:C1").copy Sheets(2).Range("A1")
Bei Arbeitsmappen übergreifendem Kopieren funzt es nicht!
Bis jetzt spreche ich die Arbeitsmappen über Variablen an.
Windows(A).Activate
range("A1:C1").copy
Windows(B).Activate
Range("A1").Select
Selection.Paste
Windows(A).Activate
range("F1:G1").copy
Range("F1").Select
Selection.Paste
Da selectieren ja wohl nicht das Wahre ist meine Frage:
Wie kann man zweckmäsiger kopieren?
Für Anworten schon im Voraus Danke
Gruss Joachim

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: kopieren von Arbeitsmappe zu Arbeitsmappe
13.01.2004 14:02:25
Karl-Otto Reimann
Hallo Joachim
Workbooks("DeinBuch1").Sheets("Tabelle1").Range("A1:C1") = Workbooks("DeinBuch2").Sheets("Tabelle1").Range("A1:C1").Value
mfG KO
AW: kopieren von Arbeitsmappe zu Arbeitsmappe
13.01.2004 14:03:30
xXx
Hallo,
ungetestet:
dim wsh1 as worksheet, wsh2 as worksheet
set wsh1=Workbooks("test1.xls").sheets(1)
set wsh2=workbooks("Test2.xls").sheets(1)
wsh1.Range("a1:c1").copy destination:=wsh2.Range("a1")
wsh1.Range("f1:g1").copy destination:=wsh2.Range("f1")
Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen an die Antworter!
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige