Object Property Example

This example inserts text at the beginning of an embedded Word document object on Sheet1. Note that the three statements in the With control structure are WordBasic statements.

Set wordObj = Worksheets("Sheet1").OLEObjects(1)
wordObj.Activate
With wordObj.Object.Application.WordBasic
    .StartOfDocument
    .Insert "This is the beginning"
    .InsertPara
End With