This might be easy for many of you but i am new in VBA.I have an Excel file with variable name which is "Dateiname" and i would like to update this "Dateiname" by adding variable "hops". My Problem is Dateiname has already ".xlsm" inside of it and i want ".xlsm" Extension to be gone after the Dateiname, so i can add "hops" variable to "Dateiname" and end it with ".xlsm" Extension.
Dim hops as String
Dim Dateiname as String
Dateiname = Dateiname & hops & ".xlsm"
How can i do this ?
There are several ways to do this. The simplest is to use
Dateiname = Replace(Dateiname , ".xlsm", hops & ".xlsm")
A drawback of this previous solution is it would fail if the extension is something other than .xlsm
. A more robust approach is
Dim A as variant, i as Long
A = Split(Dateiname,".")
i = UBound(A)-1
A(i) = A(i) & hops
Dateiname = Join(A,".")
Finally, the File System Object (which can be used from VBA) contains various methods for taking apart and reassembling paths in different ways. I tend to use lower tech approaches like the above, but for some purposes you might need more sophisticated tools.