Hatena::Groupuwsc

Word.Application

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

Word.Application

Word.Application

概要

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

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

サンプル

// File : Make9x9TableByWord.uws
// Description : UWSC から Word を使用して「九九表」を作成するサンプル
Option Explicit

Main()

Procedure Main()
    Dim word
    word = CreateOleObj("Word.Application")
    word.Visible = True
    Dim doc
    doc = word.Documents.Add()
    Dim rng
    rng = doc.range()
    doc.Tables.Add( rng, 9, 9 )
    Dim tbl
    tbl = doc.Tables(1)
    Make9x9Table( tbl )
Fend

Procedure 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
Fend
実行結果
123456789
24681012141618
369121518212427
4812162024283236
51015202530354045
61218243036424854
71421283542495663
81624324048566472
91827364554637281

参考情報