ich habe wieder mal eine Frage.
Ich möchte in der Zelle C2 den Namen der Datei ohne die Endung stehen haben.
Wie kann das gemacht werden?
Vielen Dank schon mal an die Spezialisten.
Gruß Rüdiger
Range("C2") = Left(ThisWorkbook.Name, Len(ThisWorkbook.Name) - 4)
Gruß Matthias
A | B | |
1 | F:\exc\www\2007\[Dateiname_In_Zelle2.xlsm]Tabelle1 | Pfad + Datei + Register |
2 | Dateiname_In_Zelle2.xlsm | Dateiname mit Endung |
3 | Dateiname_In_Zelle2 | Dateiname ohne Endung |
Formeln der Tabelle | ||||||||
|
MsgBox Left(ThisWorkbook.Name, InStrRev(ThisWorkbook.Name, ".") - 1)
Gruß Matthias