Datei öffnen mit Variablen Übergabe

[sanni7]

Hallo,

ich habe folgendes probiert:

Public dateiname As String


Sub data()

dateiname = InputBox("Bitte geben Sie den Dateinamen des Reports ein. Z.B. Dateiname: bw_ham.xls, Eingabe: bw_ham")

Workbooks(dateiname).Open

Call subcommodities_zuordnen

Workbooks(dateiname).Save

Workbooks(dateiname).Close

End Sub



Leider gibt es in der Zeile mit dem Dateiöffnen eine Fehlermeldung. Schließen und Speichern klappt komischerweise.
Wäre super, wenn mir jemand helfen kann. Vielen Dank schon einmal im Voraus

 

[Zvoni]

Schon daran gedacht, dass der Pfad zu einer Datei eigentlich zu einem Dateinamen gehoert?

 

[sanni7]

Die Dateien liegen im gleichen Ordner. Das merkwürdige ist, dass das Speichern und Schließen funktioniert. Jedoch nicht das Öffnen?!

 

[Alex F.]

Hast du zvonis Antwort nicht gesehen ? Das ist die Lösung - basta.


Grüsse bb

 

[Zvoni]

Die Dateien liegen im gleichen Ordner. Das merkwürdige ist, dass das Speichern und Schließen funktioniert. Jedoch nicht das Öffnen?!

natuerlich funktioniert speichern/schliessen, da in dem Fall, wenn kein Pfad angegeben wird, automatisch der Pfad der Arbeitsmappe als Working directory verwendet wird.