Linking to Excel Sheet 1

[montana9550]

I have a program that draws data from an Excel sheet and in the program it spells out exactly where to find the data- "D:/data/etc."
Is there a way to tell the program to look in the directory that the program itself is located, even if it's on a CD (D:?) or on a hard drive (C:?) or on a flash drive (E:?) Being that any of these drive letters can be different on any given computer.
Basicly is there a way to tell the program to look in the root directory?

Thanks

 

[bjd4jc]

App.Path

 

[montana9550]

This is the code I'm using now, I'm not exactly sure how to apply your answer ("App.Path")
'
Set xlApp=CreateObject("Excel.Application")
Name2="C:\data\standBy.xls"
Set xlbook=xlApp.Workbooks.Open(fileName:=Name2)
'
? Name2= App.Path "\data\standBy.xls" ?

Is this the right syntax???

thanks for your time

 

[bjd4jc]

Name2 = App.Path & "\standBy.xls"