Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Driving Word
Message
From
11/04/2008 05:52:22
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Third party products
Title:
Driving Word
Miscellaneous
Thread ID:
01309899
Message ID:
01309899
Views:
47
Hello Everyone,

An age old question (probably). I need to drive Word to manage some documents. I've records a macro in Word to open a document, select all the text and copy it, create a new document and paste the text in:

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 4/11/2008 by Development
'
ChangeFileOpenDirectory "C:\Empower\System\Personnel P\EMPOWER\"

Documents.Open FileName:="""Applicant - Offer.doc""", ConfirmConversions:= _
False, ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto, XMLTransform:=""

Selection.WholeStory
Selection.Copy
Documents.Add DocumentType:=wdNewBlankDocument
Selection.PasteAndFormat (wdPasteDefault)

End Sub


How would I do this in VFP after I create a Word.Application object? Any help or pointers to resources is appreciated.

Cheers,

Andy
Next
Reply
Map
View

Click here to load this message in the networking platform