Anzeige
Archiv - Navigation
1676to1680
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
Inhaltsverzeichnis

Dateiname auslesen - getopenfilname(.. ,True)

Dateiname auslesen - getopenfilname(.. ,True)
05.03.2019 07:51:56
Wiebke
Hallo zusammen,
bisher bin ich immer fündig geworden wenn ich Antworten gesucht habe.. jetzt aber leider nicht. Daher poste ich selber.
Die Fragestellung ist einfach:
Ich möchte den Dateinamen auslesen.
Der code lautet wie folgt (reduziert auf das wichtigste):
Sub Daten_Laden()
Dim varFileName as Variant
varFileName = Application.GetOpenFilename(".txt Datei(*.txt), *.txt", , "Load .txt", , True)
End Sub

Das "True" am Ende ist wichtig, sonst funktioniert des Rest meines Codes nicht.
Mit dem "True" funktioniert aber "Dir(varFileName)" leider nicht.. .
Über Antworten freue ich mich sehr!
Viele Grüße,
Wiebke

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

Betreff
Datum
Anwender
Anzeige
AW: Dateiname auslesen - getopenfilname(.. ,True)
05.03.2019 07:58:04
EtoPHG
Hallo Wiebke,
Mit dem "True" funktioniert aber "Dir(varFileName)" leider nicht.. .
Natürlich nicht, denn mit deinem True erlaubst du die Auswahl mehrerer Dateien und Dir(x) ist darauf angewiesen genau einen (Datei)-Parameter zu verarbeiten. Du musst also prüfen, ob dein varFileName mehrere Elemente enthält! (Hätte angenommen, dass dies bei deinem angegeben Level bekannt ist!)
Gruess Hansueli
AW: Dateiname auslesen - getopenfilname(.. ,True)
05.03.2019 08:37:38
Wiebke
Danke für die Antwort.
Aber das hilft mir leider noch nicht bei der Lösung meines Problems..
Viele Grüße,
Wiebke
dann beschreib mal Dein Problem...
05.03.2019 08:41:53
EtoPHG
Wiebke,
denn Zitat:
Das "True" am Ende ist wichtig, sonst funktioniert des Rest meines Codes nicht.
Mit dem "True" funktioniert aber "Dir(varFileName)" leider nicht.. .

ist wohl keine vollständige Aufgaben-, bzw. Problembeschreibung!
Gruess Hansueli
Anzeige
AW: dann beschreib mal Dein Problem...
05.03.2019 08:54:55
Wiebke
Hallo Hansueli,
mit deinem Satz
"mit deinem True erlaubst du die Auswahl mehrerer Dateien" habe ich mein Problem soeben gelöst.
Sub Daten_Laden()
Dim varFileName as Variant
varFileName = Application.GetOpenFilename(".txt Datei(*.txt), *.txt", , "Load .txt", , True)
MsgBox Dir(varFileName(1))
End Sub
lautet die Lösung auf dem kurzen Weg.
Allerdings benötige ich die Mehrfachauswahl nicht - das muss ich dann nur auch in meinem folgenden Code ändern. Wenn ich True entferne, klappt natürlich varFileName(1) im restlichen Code nicht mehr.
Vielen Dank!!
Anzeige

132 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige