How to repeatedly set the format in word?

[kyjdp]

I use Qm in Word to find and replacement function, but can not succeed :oops:
In addition, I would like to ask, How to handle multiple word documents,thank you very much

Macro Macro1
Trigger SF9     

Code:

Copy      Help

;/exe 1
out

typelib Word {00020905-0000-0000-C000-000000000046} 8.0
Word.Application app._getactive ;;connect to Word. Note: need the /exe 1.
Word.Document doc=app.ActiveDocument
str s=doc.Content.Text
;out s
s.findreplace("help" "Help")
(`c);BEGIN PROJECT
;main_function  Macro1
;exe_file  $my qm$\Macro1.qmm
;flags  6
;guid  {65A1A142-ACAF-4E66-B62C-3AC225AD7274}
;END PROJECT