Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
412to416
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
412to416
412to416
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Laufwerk + Pfad

Laufwerk + Pfad
Herbert
Hallo,
Ich öffne eine Textdatei und benutze davor folgende Befehle:
ChDrive Laufwerk
ChDir Speicherpfad
Das Laufwerke weise ich wie folgt zu
Laufwerk = Workbooks("Datenblatt.xls").Sheets("config").Range("C10").Text
Gibt es eine andere Möglichkeit das Laufwerk abzufragen außer Manuell?
Mit dem Speicherpfad klappt das ja mit ThisWorkbook.Path
Aber wenn ich nur das angebe mekert er bei dem Laufwerk
Herbert.

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Laufwerk + Pfad
Matthias
Hallo Herbert,
Warum wechselst Du beim Öffnen der Textdatei erst den Pfad und gibst ihn nicht einfach beim Dateinamen an?
Gruß Matthias
AW: Laufwerk + Pfad
11.04.2004 23:33:38
Herbert
Weil er mir leider dann nicht den Korrekten Pfad wiedergibt
sobald ich dann den Dialog öffnen aufrufe
lande ich in "Eigene Dateien"
Geb ich ihm das Laufwerk erst vor dann lande ich zb unter
I:\test\save\
AW: Laufwerk + Pfad
11.04.2004 23:40:57
Matthias
Hallo Herbert,
versuch' das mal:

Sub OpenFile()
ChDrive Left(ThisWorkbook.Path, 2)
ChDir Mid(ThisWorkbook.Path, 3)
s = Application.GetOpenFilename("Textdateien, *.txt,Alle Dateien, *.*")
MsgBox s
End Sub

Gruß Matthias
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige