Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.


Eine Datei schließen, eine andere Öffnen
#1
Hi VBA Profis,
ich bräuchte etwas Hilfe.

1. Ich brauch eine VBA Programm für Excel, dass eine Excel Datei X1 im Verzeichnis V1 schließt und gleichzeitig eine Excel Datei X2 im Verzeichnis V2 öffnet. Wie sieh da der Programmcode aus?

2. Ich bräuchte eine Programmierung das ein Tabellenblatt mit Daten aus einer Datei X1 im Verzeichnis V1 in eine Datei X2 im Verzeichnis V2 kopiert.

Besten Dank für Eure Hilfe im Voraus.
to top
#2
Hallo Sonja,

1.
Geht z.B. so:
Code:
Sub MeinMakro1()
Windows("x1.xlsx").Close
Workbooks.Open "D:\Test\x2.xlsx"
End Sub
Wo die Datei X1 liegt, ist dabei egal - Du kannst in Excel ja nur eine Datei mit diesem Namen öffnen.

2.
Kopieren tust Du im Prinzip so, wenn beide Dateien offen sind. Wenn nicht, in 1. steht ja, wie eine aufgeht. Die andere geht genau so, nur mit dem anderen Dateinamen und Pfad.
Code:
Sub MeinMakro2()
Workbooks("x1.xlsx").Sheets("Tabelle1").Range("A1:B2").Copy Workbooks("x2.xlsx").Sheets("Tabelle1").Range("A1:B2")
End Sub
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
[-] Folgende(r) 1 Benutzer sagt Danke an schauan für diesen Beitrag:
SonjaFido
to top
#3
Hallo André vielen Dank für Deine Hilfe. Dein Code funktioniert perfekt mit - kleinster - Korrektur.
(Bin sicher du hast dich nur verschrieben!)


Zuerst gewünschte Datei öffnen, dann bestehende schließen:

Sub MeinMakro1()
Workbooks.Open "D:\Test\x2.xlsx"
Windows("x1.xlsx").Close
End Sub
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
Photo Makro zum Kopieren bis eine leere Zeile kommt ambropete 3 58 Vor 5 Stunden
Letzter Beitrag: BoskoBiati
  Daten aus anderer Excel Datei selektiert in neue Datei übernehmen Casual 5 69 08.12.2016, 15:35
Letzter Beitrag: Casual
  Immer nur eine Zeile füllen Jenny Ring 11 126 07.12.2016, 16:42
Letzter Beitrag: Jenny Ring
Question Eine lückenlose Liste erstellen. Olivenbaum2013 5 62 06.12.2016, 10:49
Letzter Beitrag: Jockel
  Warum funktioniert eine Case-Struktur nicht ? Icepic 14 220 02.12.2016, 15:50
Letzter Beitrag: Rabe
  Xlsm Datei mit Office 2003 öffnen Thomas der Xte 7 133 19.11.2016, 17:51
Letzter Beitrag: Thomas der Xte
Question Anzahl der Hyperlinks auf eine Zelle zählen ipsips 4 96 19.11.2016, 10:06
Letzter Beitrag: RPP63
  Bestimmter teil aus Zelle in eine andere Kopieren markaay 3 59 17.11.2016, 11:13
Letzter Beitrag: BoskoBiati
  VBA: Wenn Datei offen dann schließen mit Speicherabfrage Kash 1 71 15.11.2016, 23:24
Letzter Beitrag: AlterDresdner
Question Eine bestimmte Feldformatierung, wenn in gleicher Zeile ein Wort vorkommt Olivenbaum2013 11 172 15.11.2016, 11:33
Letzter Beitrag: Olivenbaum2013

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste