>THats what i thought
>
>heres the word basic macro that i recorded but i dont see how to adapt it.!
>
>
>Sub Macro1()
>'
>' Macro1 Macro
>' Macro recorded 17/09/01 by Colin Burton
>'
> Selection.InlineShapes.AddPicture FileName:= _
> "C:\vms\001-VAN.M-15030-SMALL.GIF", LinkToFile:=False, SaveWithDocument:= _
> True
>End Sub

This works for me:

oWord.Selection.InlineShapes.AddPicture('PictName.GIF', .F., .T.)