bisher habe ich mit folgendem Code den Inhalt bestimmter Zellen in eine Textdatei exportiert:
ifile = FreeFile
Open "c:\Ordner\Unterordner\export.txt" For Append As ifile
Print #ifile, Worksheets("Datenexport").Cells(10, 8)
Close ifile
Nun möchte ich den Pfad für die Textdatei aber nicht mehr im Code angeben, sondern abhängig vom Pfad der Exceldatei machen. Die txt soll im gleichen Ordner erstellt werden, wo die xls liegt.Wie muss ich den Code dafür anpassen?
Danke & Gruß
Henner