File Name and Full Path Name

[Jess]

How can I get in excel the file name and the full path to the file? Is there
a VBA command that retrieves this info?

Thanks

 

[Mike H]

Hi

mypath = ThisWorkbook.FullName
--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.

 

[Jess]

How can I also create a footer whose content is the full path followed by the
file name?

Thanks

 

[Dave Peterson]

Dim wkbk as workbook
set wkbk = activeworkbook 'thisworkbook or workbooks("book1.xls")

msgbox wkbk.name
msgbox wkbk.Fullname
msgbox wkbk.Path

If you're creating a new workbook in your code and you want to test to see if
it's been saved:

if wkbk.path = "" then
'not saved
else
'saved
end if

 

[Gord Dibben]

Delete what you don't want.

Sub PathInFooter()
ActiveSheet.PageSetup.RightFooter = ActiveWorkbook.FullName & " " & _
ActiveSheet.Name & " " & Application.UserName & " " & Date
End Sub


Gord Dibben MS Excel MVP

 

[Ryan H]

Choose Insert Footer and put this in the Left, Center, or Right Footer

&[Path]&[File]&[File]

Hope this helps! If so, let me know, click "YES" below.

 

[Ryan H]

Correction:

&[Path]&[File]