Help Retrieving filename without .xls attached

  • Thread starter Thread starter Marshall
  • Start date Start date
M

Marshall

I would like to try and retrieve the filename of the current workbook,
without having the ".xls" portion of it attached.

I'm currently retrieving the
ActiveWorkbook.Name
maybe there is a way to parse this or something?


Any help is greatly appreciated. Thanks.
 
How about just cutting it down yourself??

Left(ActiveWorkbook.Name, Len(ActiveWorkbook.Name) - 4)

Dan E
 
one way:

Dim fName As String
Dim nLen As Integer
fName = ActiveWorkbook.Name
nLen = Len(fName) - 3
If Mid(fName, nLen, 1) = "." Then _
fName = Left(fName, nLen - 1)
 
Back
Top