problems in OLE Inline shapes

I have a program that opens excel file as a inline shapes and pastes it in a word document. All the excel files have some macros which populate the data in the files.
The program is working fine except that every time it opens a file as an object it ask whether i want to update the information in the excel file whichis opened.
Can anyone tell me how to prevent this message from poping up for all the files.

I am attaching the code which i am writing .
==============================================

Sub formatAttachments(strExcelFile As String, wrd As Object)

Dim shp As InlineShape

Set shp = wSel.InlineShapes.AddOLEObject(FileName:=strExcelFile, LinkToFile:=True, DisplayAsIcon:=False)

==============================================


Thanks for your help in Advance

Harshad