dcsimg
Login | Register   
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX

By submitting your information, you agree that devx.com may send you DevX offers via email, phone and text message, as well as email offers about other products and services that DevX believes may be of interest to you. DevX will process your information in accordance with the Quinstreet Privacy Policy.


Tip of the Day
Language: COM/DCOM/COM+
Expertise: Beginner
Jun 15, 1999

WEBINAR:

On-Demand

Application Security Testing: An Integral Part of DevOps


PowerBuilder 6.5 and MS Word 97 Example

Question:
Do you have any examples of calling MS Word Visual Basic to open, modify, print and close a document (i.e., calling macros, inserting tables)?

Answer:
Here is an example of connecting to Word, and creating a table, then populating the table with headings, it should give you a few pointers on how to get up and running. The Word macro editor is the best place for information on writing Word automation.

OleObject lole_OLE, lole_Selection

lole_OLE = CREATE OleObject

// Connect to the word application
lole_OLE.ConnectToNewObject( 'word.application.8' )
lole_OLE.Application.Visible = TRUE
lole_OLE.Documents.Add()

lole_Selection = lole_OLE.Selection

// Create a table for the list data and add the column headers
lole_OLE.ActiveDocument.Tables.Add( lole_OLE.Selection.Range, 1, 3 )
lole_Selection.TypeText( 'First Name' )
lole_Selection.MoveRight( 12 )
lole_Selection.TypeText( 'Last Name' )
lole_Selection.MoveRight( 12 )
lole_Selection.TypeText( 'City' )
lole_Selection.MoveRight( 12 )

lole_OLE.DisconnectObject()
DESTROY lole_OLE
DevX Pro
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
×
We have made updates to our Privacy Policy to reflect the implementation of the General Data Protection Regulation.
Thanks for your registration, follow us on our social networks to keep up-to-date