Office: Daten aus anderer Excel-Datei kopieren

Chris2610 · 27. August 2008

Hallo,

ich möchte, dass man in meiner Excel-Anwendung Daten aus einem Excel-Dokument einfügen kann. Dazu will ich das andere Excel-Doc öffnen lassen, dort alles markieren und kopieren, und anschließend in mein eigentlich Excel-Dokument einfügen lassen. Der Code dazu sieht so aus:

Code:

Sub DatenEinlesen2()

Workbooks.Open Filename:=strPfad

Cells.Select
Selection.Copy
Windows("Kopie von TicketStatistik.xls").Activate
Range("A1").Select
ActiveSheet.Paste

End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Bei dem Statement "Cells.Select" kommt ein Laufzeitfehler 1004, "Die Select-Methode des Range-Objekts konnte nicht ausgeführt werden".

Wo liegt hier der Fehler? Ich habe auch schon versucht dass geöffnete Dokument per Activate zu aktivieren, aber das klappt auch nicht :-(

:)

EarlFred · 29. August 2008

Hallo Chris,

probier es mal mit folgendem Code, ohne die ganzen "Selects" und "Activates", dafür mit eindeutiger Zuordnung der Quelle und des Ziels, damit es klar ist, was von wo nach wo kopiert werden soll:

Code:

Option Explicit
Sub bereich_kopieren()
Dim wsZiel As Worksheet
Dim wsQuelle As Worksheet
'Zielblatt = aktive Datei, aktives Blatt
Set wsZiel = ActiveWorkbook.ActiveSheet
'Quellblatt = Datei, Blatt 1
Set wsQuelle = Workbooks.Open(Filename:="C:\Temp\Mappe1.xls").Worksheets(1)
'Kopieren
wsQuelle.Cells.Copy Destination:=wsZiel.Cells
'Quelle schließen
wsQuelle.Parent.Close
Set wsQuelle = Nothing
Set wsZiel = Nothing
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Grüße
EarlFred

Chris2610 · 29. August 2008

Cool danke schön. Genau das wars!

Laika_1988 · 1. Dezember 2014

Hallo,

ich hoffe, ich kann den Thread aufleben lassen.

Was ist, wenn der Pfad zu der Datei immer anders ist ?
Das Einzige, was ich weiß ist, dass sie im übergeordneten Pfad ist als die aus der kopiert werden soll.

Wie mache ich das ?

Office: Daten aus anderer Excel-Datei kopieren

Daten aus anderer Excel-Datei kopieren

Daten aus anderer Excel-Datei kopieren

Daten aus anderer Excel-Datei kopieren

Daten aus anderer Excel-Datei kopieren - Similar Threads - Daten Excel Datei

Daten Kopieren aus einer zweiten Datei

Daten mehrerer Excel Dateien in eine Zieldatei kopieren

Daten aus einer anderen excel Datei aktualisieren nach Schlüsselfeld Macros?

Word/Excel Formulare mit dynamischen Abruf von Daten aus geschlossenen Excel Dateien

Daten Import

Gespeicherte Excel Datei - Daten gelöscht

Daten aus Formular in Excel-Datei speichern - VBA, wie?