App.Path in Excel

[Sathyaish]

What is the equivalant of App.Path in VBA programming with Excel? I've tried Me.Path inside the ThisWorkbook module, even tried Workbooks(1).Path but they all return vbNullString.

[adocwra]

Sub a()
MsgBox ThisWorkbook.Path


End Sub

[schuurke28]

or activeworkbook.path

[lintz]

You can also use....

Set objExcel = CreateObject("Excel.Application")
Set oXLApp = objExcel.Workbooks.Open(FileName:=App.Path & "\" & "Book1.xls")