About Word VBA Application Object

About Word VBA Application Object page contains information about using the Word application object from within another application, such as VB, Excel, Outlook, etc.

The following code places some values into cells A1 to A5, selects, and then copies them.

Then it creates a  Word obect and a Document Object and pastes the cells into the Document.

Note the 2 commented lines...

'    Dim objWord As Word.Application
'    Dim objDoc As Word.Document

While creating the code I used these 2 lines instead of the 2 line above them so intellisense would work. It doesn't work with "As Object" because it doesn't know what type of obect it is. So now you may ask why not just leave the 2 "As Word"... lines and not use the lines with "As Object?"

The reason is two-fold. The first is because to use As Word... lines you first have to add a reference to the Word Object Module in Tools>References (click here to see how).  Other versions of Word may have problems since they don't have the exact same module if you use the code on another computer, such is the case when you compile an exe file in VB.

The second reason is that with the generic As Object, when a computer with any version of Word runs the code...

Set objWord = CreateObject("Word.Application")

... it will create a Word Object with the same version that is installed on it.

Sub WordObject()
    Dim objWord As Object
    Dim objDoc As Object
'    Dim objWord As Word.Application
'    Dim objDoc As Word.Document
    ActiveCell.FormulaR1C1 = "1"
    ActiveCell.FormulaR1C1 = "2"
    ActiveCell.FormulaR1C1 = "3"
    ActiveCell.FormulaR1C1 = "4"
    ActiveCell.FormulaR1C1 = "5"
    Set objWord = CreateObject("Word.Application")
    objWord.Visible = True
    Set objDoc = objWord.Documents.Add
    Set objDoc = Nothing
    Set objWord = Nothing
End Sub


Return from About Word VBA Application Object to VBA Code Samples

Return to our Homepage