How do I determine the file path with the file name at the end
MsgBox ThisWorkbook.Path & vbCrLf & ThisWorkbook.Name
--
HTH...
Jim Thomlinson
"QuietMan" wrote:
This gets me the file name but need the path seperate
Path = Left(ActiveWorkbook.FullName, Len(ActiveWorkbook.FullName) - _
InStrRev(ActiveWorkbook.FullName, Application.PathSeparator))
--
Helping Is always a good thing
|