ShellExecute starting new instance of Excel

[Reg]

I have got an Excel Menu which needs to launch workbooks into the
current instance of Excel. I am trying to do this with the following :

hwnd = FindWindow("XLMAIN", Application.Caption)

lngResult = ShellExecute(hwnd, "open", strFilePath, vbNullString,
CurDir$, SW_SHOWNORMAL)

I am getting back a value of the hwnd but for some reason it always
launches the workbook in strPath into a new instance of Excel.

Any ideas ?

Rich

 

[Tom Ogilvy]

just use

workbooks.open Filename:=sPath & "\" & sFilename

skip all the API stuff.