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

Dringend: ChDir

Forumthread: 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.



Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: Dringend: ChDir
28.05.2003 13:50:45
Nike

Hi,

wenn das Umspringen in deinem Code passiert müßte man wohl noch mehr von deinem Code sehen...

Bye

Nike

Ansonsten vielleicht hier mal reinschaun:
https://www.herber.de/forum/archiv/212to216/t213261.htm

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

;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige