Relative import locations in macro

[rbmcclen]

Hi,
How do I make the text import location of a file relative to the
location of the workbook?

My macro imports a text file 01.txt from the same location the workbook
is located:

With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;C:\Project\07 July\01.txt", Destination _
:=Range("C2"))

So that I can move the spreadsheet to other folders containing the same
named files and it still work?

 

[rbmcclen]

bump?

Someone surely knows if relative pathnames are possible in macros?