Here are a couple of things that stand out:
- Don't open another file within the project open event. Put this code somewhere else.
- Uncomment the file name variable initialization.
- To merge an Excel file into the active Project file, the Merge parameter should be 1
- Try using FormatID:="MSProject.xls"
If all that fails, record a macro using the steps that worked for you manually.