View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Quietman Quietman is offline
external usenet poster
 
Posts: 109
Default How do I determine the file path with the file name at the end

thanks
--
Helping Is always a good thing


"Jim Thomlinson" wrote:

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