Document オブジェクト (Publisher)

[アーティクル]
04/07/2023

文書を表します。

注釈

ActiveDocument プロパティを使用して、現在のパブリケーションを参照します。

例

次の使用例は、作業中の文書の先頭ページに表を追加します。

Sub NewTable() 
 With ActiveDocument.Pages(1).Shapes 
 .AddTable NumRows:=3, NumColumns:=3, Left:=72, Top:=300, _ 
 Width:=488, Height:=36 
 With .Item(1).Table.Rows(1) 
 .Cells(1).TextRange.Text = "Column1" 
 .Cells(2).TextRange.Text = "Column2" 
 .Cells(3).TextRange.Text = "Column3" 
 End With 
 End With 
End Sub

ThisDocument モジュールへの参照を使用して、前のルーチンを記述することもできます。次の使用例では、 ActiveDocument ではなく ThisDocument 参照を使用します。

Sub PrintPublication() 
 With ThisDocument.Pages(1).Shapes 
 .AddTable NumRows:=3, NumColumns:=3, Left:=72, Top:=300, _ 
 Width:=488, Height:=36 
 With .Item(1).Table.Rows(1) 
 .Cells(1).TextRange.Text = "Column1" 
 .Cells(2).TextRange.Text = "Column2" 
 .Cells(3).TextRange.Text = "Column3" 
 End With 
 End With 
End Sub

イベント

メソッド

プロパティ

関連項目

Publisher オブジェクトモデルリファレンス

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。

フィードバック

以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバックメカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバックシステムに置き換えます。詳細については、「https://aka.ms/ContentUserFeedback」を参照してください。

フィードバックの送信と表示

このページ

すべてのページフィードバックを表示