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

Makro - File aus Verzeichnis öffnen

Forumthread: Makro - File aus Verzeichnis öffnen

Makro - File aus Verzeichnis öffnen
28.03.2006 08:53:08
Stefan
Hi,
öffne mittels einem Makro im aktuellen Verzeichnis eine Datei mit
Workbooks.Open Filename:= _
Application.ActiveWorkbook.Path & "\MIM.XLS"
Nun möchte ich eine Datei aus dem VORGELAGERTEN Verzeichnis öffnen, kann aber den "richtigen" Pfad nicht verwenden, da sich dieser immer wieder mal ändert.
Hat jemand eine Idee ?
Danke & LG
Stefan
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro - File aus Verzeichnis öffnen
28.03.2006 09:00:13
Sylvio
Hallo Stefan,
kürze den Pfad doch einfach um eine Ebene über eine Schleife, wenn der Pfad immer ne Ebene höher ist.
path = Application.ActiveWorkbook.Path
temp = path
Do While InStr(Len(temp), temp, "\") = 0
temp = Left(temp, Len(temp) - 1)
Loop
newpath = temp
Gruß Sylvio
Anzeige
AW: Makro - File aus Verzeichnis öffnen
28.03.2006 09:11:55
Stefan
Hi Sylvio,
danke für Deine Antwort. Bin leider kein Makro / VBA Spezialist und weis nicht wo ich den Code einfüge...
Der Teil meines Makros sieht so aus :
Workbooks.Open Filename:= _
Application.ActiveWorkbook.Path & "\MMMO .XLS"
Workbooks.Open Filename:= _
Application.ActiveWorkbook.Path & "\KI.XLS"
Workbooks.Open Filename:= _
Application.ActiveWorkbook.Path & "\KIZ.XLS"
Das Verwendete Verzeichnis heißt ../Vorlage/Daten/
Wo muss ich den Code einfügen ?
Danke und LG
Stefan
Anzeige
AW: Makro - File aus Verzeichnis öffnen
28.03.2006 09:18:21
Sylvio
Hallo Stefan,
welche von den drei aufgeführten Dateien befinden sich denn in dem Ordner darüber?
Gruß Sylvio
AW: Makro - File aus Verzeichnis öffnen
28.03.2006 09:33:28
Stefan
Hi,
Das Makro hat folgenden Pfad ../Vorlage/Daten/Zusammenführen.xls
Alle Dateien die geöffnet werden sollen sind im Verzeichnis ../Vorlage/
LG Stefan
AW: Makro - File aus Verzeichnis öffnen
28.03.2006 09:44:18
Sylvio
OK dann schreib es so davor:
ICh gehe jetzt davon aus das sich MMMO.XLS, KI.XLS und KIZ.XLS eine Ebene über deinem Workbook befinden wo dieser Code ausgeführt wird.
path = Application.ActiveWorkbook.Path
temp = path
Do While InStr(Len(temp), temp, "\") = 0
temp = Left(temp, Len(temp) - 1)
Loop
newpath = temp
Workbooks.Open Filename:= _
newpath & "MMMO.XLS"
Workbooks.Open Filename:= _
newpath & "KI.XLS"
Workbooks.Open Filename:= _
newpath & "KIZ.XLS"
Gruß Sylvio
Anzeige
AW: Makro - File aus Verzeichnis öffnen
28.03.2006 14:54:19
Stefan
Hi Sylvio,
danke für die Hilfe !!!!!!!!
;

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