Hatena::Groupvbscript

Word.Application

主要な Windows 標準コンポーネントの一覧 → http://vbscript.g.hatena.ne.jp/keyword/ProgID
VBScript 基礎文法最速マスター → http://vbscript.g.hatena.ne.jp/cx20/20100131/1264906231

Word.Application

Word.Application

概要

Word.ApplicationWord アプリケーション オブジェクトを表す ProgID です。

Word アプリケーション オブジェクトは、通常、Wordオートメーション操作する場合に使用します。

サンプル

' File : Make9x9TableByWord.vbs
' Usage : CScript //Nologo Make9x9TableByWord.vbs
' Description : VBScript から Word を使用して「九九表」を作成するサンプル
Option Explicit

Call Main()

Sub Main()
    Dim word
    Set word = CreateObject("Word.Application")
    word.Visible = True
    Dim doc
    Set doc = word.Documents.Add()
    Dim rng
    Set rng = doc.range()
    doc.Tables.Add rng, 9, 9
    Dim tbl
    Set tbl = doc.Tables(1)
    Call Make9x9Table( tbl )
End Sub

Sub Make9x9Table( tbl )
    Dim x
    Dim y
    For y = 1 To 9
        For x = 1 To 9
            tbl.Cell( y, x ).Range.Text = x * y
        Next
    Next
End Sub
実行結果
123456789
24681012141618
369121518212427
4812162024283236
51015202530354045
61218243036424854
71421283542495663
81624324048566472
91827364554637281

参考情報