MS Word application find and replace

[stersergiu]

Is there any way to connect to ms word like excel and run my macro step by step;

for excel is :
ExcelSheet es1.Init
Excel.Application app=es1.ws.application
and then run macros with app.selection.find


Isn't there a way to run Word.Application a._getactive , and then simply translate my macro in QM
a.Selection.Find.ClearFormatting and so on ... ?