Insert an Object into an Excel Worksheet

I have an Excel Worksheet that i would like to insert an Excel document. I can do this manually by the following steps;

Insert / Text / Object / Create From File (tick Display as Icon) / Browse. I then select the file and insert the document.

I would like to do this via a macro ( and NO i can record it ) as the recorder wont let you

The code I do have ( and it work great ) is as follows

 Sub ShowInsertObj()
   Application.Dialogs(xlDialogInsertObject).Show
 End Sub

This code basically is Insert / Text / Object

Now for my question

I would like to add some code so that a directory (lets say C:\temp) will automatically be selected and display as icon will be ticked - instead of applying the above steps

Any help would be appreciated