Maybe...

sub myOpen()
Workbooks.Open thisworkbook.path & "\open.xls"
end sub

Tomo wrote:

I have file run.xls in d:\xls\

in vb i need to open file open.xls in direcory from witch I opened run.xls,
this is d:\xls\

if i move or copy entire d:\xls into e:\xls i would like to open open.xls
from run.xls

eg
sub open ()
Workbooks.Open "d:\xls\open.xls"
end sub

this code will open open.xls from path d:\xls, but when i move or copy
entire d:\xls into e:\xls and start macro, error occurs

please help

--

Dave Peterson