File mit ordner Name speichern

Forumthread: File mit ordner Name speichern
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: File mit ordner Name speichern

10.08.2004 15:59:55

Gernot

Hejsa,
moechte gerne files mit dem aktuellen ordner Namen speichern z.B. c:\HTS\bibliotek12\02042004 aber eben nur 02042004.xls. Mit activeworkbook.path bekomme ich immerhin den Pfad raus. Wie kann ich den Rest der links von 02042004 steht per VBA entfernen?
Gruss aus Daenemark, Gernot

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: File mit ordner Name speichern

Ramses
AW: File mit ordner Name speichern

Gernot

AW: File mit ordner Name speichern

Ramses

Hallo
das geht nicht, weil im Pfad Sonderzeichen sind, die im Dateinamen verboten sind ( Z.B. ":", "\" usw. )
Den Namen des rechts vom letzen Slash stehenden Wertes erhälts du mit


Sub extract_name()
Dim myStr As String
Dim curP As String
curP = ActiveWorkbook.Path
myStr = Right(curP, Len(curP) - InStrRev(curP, "\", -1))
Debug.Print myStr
End Sub

Gruss Rainer

AW: File mit ordner Name speichern

Gernot

Danke Rainer,
genau das wars
Gruss