Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
260to264
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
260to264
260to264
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Dringend: ChDir

Dringend: ChDir
28.05.2003 13:36:55
Frederik Fuhrmann
Hallo!

Ich mache während eines Makros einen Sprung in ein anderes, indem der Pfad umgestellt wird:

ChDrive "Y:"
ChDir...

Da aber nun auf anderen Rechnern evtl. ein anderer Laufwerksbustabe belegt ist, möchte ich das so abändern:

ChDir ("\\server\Ordner\")

allerdings wird der Pfad nicht beibehalten, sondern springt wieder auf den des ActiceWorkbook um!
Wer kann mir helfen?

Gruß
F.



4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Dringend: ChDir
28.05.2003 13:58:50
Frederik Fuhrmann

Hallo Nike!

Hier die entsprechenden Codeteile:
Hier passiert der Sprung zum anderen Makro:


Originaldateiname_Mengen = Jahr & "_" & Monat & "_" & Tach & ".xls"
Originaldateiname_AUSS_NA = "AUSS_NA " & Jahr & "_" & Monat & "_" & Tach & ".xls"

Run "dir_download"  'Hier der Sprung
Workbooks.Open (Originaldateiname_Mengen)
Mengen_Zeiten_Auswertung = ActiveSheet.Name
Workbooks.Open (Originaldateiname_AUSS_NA)
Auss_NA_Auswertung = ActiveSheet.Name
 


Das andere Makro:



Sub dir_Download()
ChDir ("\\hay03\pc_daten\Öffentliche Ordner\AL-Bo\Targus\Fertigungskennzahlen\ZP16 Download")
End Sub
 



Anzeige
Re: Dringend: ChDir
28.05.2003 14:35:01
Frederik Fuhrmann

Ah, danke, glaub das hilft mir weiter!

Gruß
Frederik

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige