YellowLabPro
10-02-2007, 05:09 AM
I want to return the name of the workbook w/out the extension.
The Find function is giving me a Sub ro Function not defined.
How do I need to alter the syntax?
edited: added .Name to ThisWorkbook.Name
emailtitle = Left(ThisWorkbook.Name, Find(".", ThisWorkbook.Name, 1) - 1)
Thanks
The Find function is giving me a Sub ro Function not defined.
How do I need to alter the syntax?
edited: added .Name to ThisWorkbook.Name
emailtitle = Left(ThisWorkbook.Name, Find(".", ThisWorkbook.Name, 1) - 1)
Thanks