wrksheetname

bruggied

New member
Local time
Today, 03:36
Joined
May 11, 2012
Messages
7
hello,

my customerfile is C:\david\axor\01-mavo2409.xlsx
with this code "file = Mid(CustomerFile, InStrRev(CustomerFile, "\") + 1)"
i receive this 01-mavo2409.xlsx

i want to remove the .xlsx extention

how can i do it
 
file = Mid(CustomerFile, InStrRev(CustomerFile, "\") + 1)
WrksheetName = Left(Mid(CustomerFile, InStrRev(CustomerFile, "\") + 1), (InStrRev((file), ".") - 1))
 

Users who are viewing this thread

Back
Top Bottom