Hi all

I am trying to open all documents from a filepath, run a macro that deletes
the watermark, save and close the document.  Is this possible.

What I have so far errors as marked below:

Sub Test()

Dim Odoc As Word.Documents

Set fs = Application.FileSearch
   With fs
       .LookIn = path '"C:\"
       .FileName = "*.doc"
' '  .Open (fail)

   End With

       For Each Odoc In fs    ' I get an error here, Object doesnt support
this property
           Call DeleteGraphic
           Odoc.save
           Odoc.close
     Next Odoc

   'End With
End Sub

Thanks in advance