To Chris0001
dianal (Instructor)'s line is missing command for
Word document visible.
This is a part of VBA rather than VBScript after you
create a Object.
<script language="VBScript">
Dim objWord
Set objWord=CreateObject("Word.Application"
objWord.Visible = True ' This command for visibility
Set oDoc = objWord.Documents.Add
'Tables.Add(Range, NumRows, NumColumns, DefaultTableBehavior, AutoFitBehavior)
Set oTable = oDoc.Tables.Add(oDoc.Range(0,0), 3, 4)
iCount = 1
For Each oCell In oTable.Range.Cells
oCell.Range.InsertAfter "Cell " & iCount
iCount = iCount + 1
Next
oTable.AutoFormat Format=wdTableFormatColorful2, ApplyBorders=True, ApplyFont=True, ApplyColor=True
objWord.Visible = true
'objWord.Quit
Set objWord=Nothing
</script>