I want to transfer data (a worksheet)from Excel program A to Excel program B the following code to open the second program works in Off 2000 but does not in 2003-

One problem seems to be that Off 2000 does not recognize "Environ" but that is not the only problem the construct of the ChDir statement seems wrong.
Any help appreciated.
Thanks

(Office 2000 VBA code)
NameOwner = Environ("UserName")
ChDir "C:\Documents and Settings\" & NameOwner & "\Desktop"
Workbooks.Open Filename:="C:\Documents and Settings\" & NameOwner & "\Desktop\FileA\Bookl.xls"

Off 2000 does not recognize "Environ" that should read Off 2003-

As a simple workaround, if the workbook is in their "My Documents" folder, you could just use
and then do a little string manipulation. I don't have Office 2000 any longer, so can't check what the issue is, but you may have to do an API call if you can't use ThisWorkbook.Path: http://windowssecrets.com/forums/sho...cel-2000-sr-1)
Hope that solves it for you.

Thanks I will try that.