Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Datei öffnen, Werte kopiren und eifügen

Forumthread: Datei öffnen, Werte kopiren und eifügen

Datei öffnen, Werte kopiren und eifügen
21.10.2008 16:13:34
Julia
Hallo liebes Forum!
Ich wende mich an Euch mit der folgenden Frage:
Wie kann ich per Makro eine bestimmte Excel-Datei "Aufträge" im Verzeichnis "C:\Daten\" öffnen, in dieser Datei Zelle C5 kopieren und meine Zieldatei "Auswertung" in die Zelle D7 einfügen und anschließend die Datei "Aufträge" ohne die Änderungen abzuspeichern schließen?
Vielen Dank für jeden Rat!
LG,
Julia
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Datei öffnen, Werte kopiren und eifügen
21.10.2008 17:17:52
Tino
Hallo,
do müsste es funktionieren.
Modul Modul1
Option Explicit 
 
Sub Test() 
Dim obDatei As Workbook 
 
 Application.ScreenUpdating = False 
    Set obDatei = Workbooks.Open("C:\Daten\Aufträge.xls", , True) 
    'Tabellenname anpassen!!!!************** 
    obDatei.Sheets("Tabelle1").Range("C5").Copy _
    ThisWorkbook.Sheets("Tabelle1").Range("D7") 
     
    obDatei.Close False 
 Application.ScreenUpdating = True 
End Sub 


Gruß Tino

Anzeige
AW: Datei öffnen, Werte kopiren und eifügen
22.10.2008 09:33:35
Julia
Vielen Dank, Tino!
Es funktioniert.
Gruß,
Julia

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige