Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

kopieren von ranges

Forumthread: kopieren von ranges

kopieren von ranges
05.07.2005 14:32:23
ranges
Hallo,
ich hab jetzt schon einige mal wegen kopieren gefragt und bekam immer ne super Antwort.
Workbooks(quefilename).Sheets(blattname).Range(Cells(1, 1), Cells(2, 3)).Copy _
Destination:=Workbooks(ergfilename).Sheets(blattname).cells(1,1)
Das ist in meinem Makro drin. Ich habe es auch schon einige male umgeändert und wenn ich einzelne Zellen kopieren will dann funktioniert es auch aber bei Ranges hab ich irgendwie einen Denkfehler drin, kann mir das vieleicht jemand erklären?
Danke
Tom
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: kopieren von ranges
05.07.2005 14:40:50
ranges
OK hab was gefunden und es funktioniert,
With Workbooks(quefilename).Sheets(blattname)
.Range(.Cells(1, 1), .Cells(2, 3)).Copy _
Destination:=Workbooks(ergfilename).Sheets(blattname).Cells(1, 1)
End With
mich würde aber trotzdem noch interessieren wo da der unterschied ist... warum kann man das n icht direkt machen? oder hab ich einfach nur was falsch gemacht :(
Anzeige
AW: kopieren von ranges
05.07.2005 14:54:18
ranges
Hallo Tom,
weil Cells() ohne "With-Punkt" davor sich immer auf das aktive Blatt bezieht. Korrekt wäre (ohne With) also:
Range(Workbooks("Mappe1").Sheets("Tabelle1").Cells(1, 1), _
Workbooks("Mappe1").Sheets("Tabelle1").Cells(3, 4)).Copy _
Destination:=Workbooks("Mappe2").Sheets("Tabelle2").Cells(1, 1)

Gruß Matthias
Anzeige
o.T. Danke, gut zu wissen
05.07.2005 15:00:27
tomp
.
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige