Replace the VBA code with the Qm code error

[kyjdp]

Try this:
Macro Macro5

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
VARIANT StartRange=doc.Paragraphs.Item(2).Range.Start
VARIANT EndRange=doc.Paragraphs.Item(4).Range.End
Word.Range ran=doc.Range(StartRange EndRange)
ran.Bold=1
ran.Font.Size=15
ran.Font.Name="Stencil"

Do You know the following VBA code, how to modify the QM code? thanks in advance

Word.Range ran=doc.Range(Start=0 End=10)