Here is a simple code :

Public Sub test()

Dim FileToParse As Object

Set FileToParse = Documents.Open("C:\Temp\Essai VB6\test.doc")

Selection.Find.ClearFormatting

End Sub

The file is correctly opened by MS Word.
If I want to use Find method, I get an error window about ole32.dll

Do you have an idea about my problem ?