Thanks DCrake, I have done exactly that, create a macro and then use the code generated, however, I get a different message. It is attached as errormessage2.jpg
The code generated by the macro is below
Selection.InlineShapes.AddOLEObject ClassType:="Word.Document.8", FileName _
:=...