how to paste write or append text on a Word document

[CTOROCK]

I wanted to create a combo box with numbers. Depending on the number chosen, it would paste or write a paragraph where the cursur is on the document. Does anyone have an idea how to paste or write or append text to an active document?
Thanks is advance
Eric "The greatest risk, is not taking one."

 

[MargeJones]

First add a reference to the Microsoft Word X.X Object Library. Then use the following code to create and write to a Word document:

Dim oApp As Word.Application
Dim oDocument As Word.Document
Dim stFileName As String

stFileName = "C:\Example Document.doc"

Set oApp = CreateObject("Word.Application&quot

oApp.Visible = True
oApp.Documents.Add
Set oDocument = oApp.ActiveDocument
oDocument.Range.Text = "This is what I want in my paragraph"
oDocument.SaveAs stFileName


You can use the oDocument object and the Paragraph property to set text fonts and sizes and also to set indents and line spacing. I hope this helps.