General information
Category:
ActiveX controls in VFP
Title:
How to make Word macro legible to VFP
Hello All !
I'm using sometimes Word as a COM SERVER, today I got a problem - couldn't find right syntax for this marco (all I need to replace ** signs with ^p)
With Selection.Find
.Text = "**"
.Replacement.Text = "^p"
.Forward = True
.Wrap = wdFindContinue
...
End With
Selection.Find.Execute Replace:=wdReplaceAll
I tried something like this:
#DEFINE wdFindContinue 1
#DEFINE wdReplaceAll 2
thisform.oWord=CreateObject("Word.Application")
WITH thisform.oWord.Selection.Find
.Text = "**"
.Replacement.Text = "^p"
.Forward = .T.
.Wrap = wdFindContinue
.....
ENDWITH
thisform.oWord.Selection.Find.Execute(wdReplaceAll) && this part doesn't work
Thanks in advance
Mariam
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only