ChDir-Befehl funktioniert nicht einwandfrei

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: ChDir-Befehl funktioniert nicht einwandfrei
von: Thomas
Geschrieben am: 27.10.2003 16:55:25

Hallo!

Ich habe einen Code verwendet, der nicht immer einwandfrei funktioniert. Ziel des Programms soll es sein, dass der Nutzer in einen schon vorherbestimmten Ordner(XY) springt und von dort aus weiter wählen kann. Die Funktion CHDir soll das ja eigentlich gewährleisten, aber sie tut es nicht. Bei der Einzelschrittanalyse springt der Editor zwar auf die Zeile, aber öffnet nicht den Ordner, sondern einen anderen. Auf meine Beobachtungen bezogen, vermute ich, dass es der Ordner ist, der zuletzt genutzt worden ist. Kann man dieses umgehen? Und wenn ja, wie?
Ich habe zur Sicherheit den Code mit angefügt.
Danke und Gruß

Thomas


Private Sub CommandButton1_Click()
Dim fFile As Variant
Dim myWord As Object
On Error Resume Next
Set myWord = GetObject("Word.Application.9")
ChDir "C:\XY"
fFile = Application.GetOpenFilename("Word-Dateien (*.doc),*.doc")
If fFile = False Then Exit Sub
If Err.Number <> 0 Then
    'Fehlervariable leeren wenn Instanz noch nicht besteht
    Err.Clear
    'Zuweisung der Instanz
    Set myWord = CreateObject("Word.Application.9")
    'Instanz öffnen
    
myWord.Visible = True ': objWW.WindowState = wdWindowStateMaximize
Else
    'Instanz besteht bereits
    myWord.Activate
    'Instanz in der Vordergrund bringen 
    
    myWord.Visible = True ': objWW.WindowState = wdWindowStateMaximize
End If
myWord.Application.Documents.Open fFile
End Sub

Bild


Betrifft: AW: ChDir-Befehl funktioniert nicht einwandfrei
von: Christian
Geschrieben am: 27.10.2003 17:03:33

ChDir wechselt nur das Verzeichnis, aber nicht das Laufwerk.

Dazu musst Du ChDrive benutzen.

Gruß,
Christian


Bild


Betrifft: AW: ChDir-Befehl funktioniert nicht einwandfrei
von: Thomas
Geschrieben am: 27.10.2003 17:12:00

Hallo,
das leuchtet ein und eröffnet ein neues Problem. Wie kann ich gewährleisten, das der Nutzer immer in den richtigen Ordner verwiesen wird, egal auf welchem Laufwerk er sich gerade befindet?

danke,

Thomas


Bild


Betrifft: AW: ChDir-Befehl funktioniert nicht einwandfrei
von: soendi
Geschrieben am: 27.10.2003 17:12:57

befehel chdrive und chdir nacheinander einsetzen?


Bild


Betrifft: AW: ChDir-Befehl funktioniert nicht einwandfrei
von: Thomas
Geschrieben am: 27.10.2003 17:20:02

Hallo,

dank vereinter Hilfe scheint es jetzt zu funktionieren. Danke.

Gruß Thomas


 Bild

Beiträge aus den Excel-Beispielen zum Thema " dringende leichte Fragen "