Pfad einer Datei in Makro verwenden

• Pfad einer Datei in Makro verwenden von Andreas vom 27.10.2003 16:55:44
  • AW: Pfad einer Datei in Makro verwenden - von Willie am 27.10.2003 17:07:09

Betrifft: Pfad einer Datei in Makro verwenden
von: Andreas
Geschrieben am: 27.10.2003 16:55:44
Hallo zusammen,

ich möchte eine Textdatei, die ich über ein Makro aus einer Excel-Datei generiere, im selben Ordner speichern. Leider weiss ich nicht, wie ich den Pfad auslesen kann um ihn meinem neuen Dateinamen voranzustellen. Der neue Dateiname steht in der Zelle J1.
Mit ActiveSheet.Parent.Name bekomme ich nur Pfad inclusive Dateinamen.

soweit bin ich bisher:
Pfad = ?? (ActiveSheet.Parent.Name)

Dateiname = ActiveSheet.[J1]
ActiveWorkbook.SaveAs Filename:=Dateiname, _
FileFormat:=xlText, CreateBackup:=False

Wer weiss Bescheid?
Danke für eine Antwort
Gruß
Andreas

Betrifft: AW: Pfad einer Datei in Makro verwenden
von: Willie
Geschrieben am: 27.10.2003 17:07:09
Gruß Willie

Pfad = Thisworkbook.Path
ActiveWorkbook.SaveAs Filename:=Pfad & Dateiname,_
FileFormat:=xlText, CreateBackup:=False