Documents オブジェクト (Publisher)
開いているすべてのパブリケーションを表します。 Documents コレクションには、Microsoft Publisher で開いているすべての Document オブジェクトが含まれています。
注釈
Documents コレクションを取得するには、Documents プロパティを使用します。
追加 の使用 コレクションに新しいドキュメントを追加する方法です。 Add メソッドが呼び出されたときに、Publisher の表示、新しいインスタンスが作成されます。
特定のドキュメント オブジェクトを取得するには、 Item (index) プロパティを使用します。 index は 、インデックス番号または文字列としてのドキュメント名です。
例
次の例では、開いているすべてのパブリケーションの一覧を示します。
Dim objDocument As Document
Dim strMsg As String
For Each objDocument In Documents
strMsg = strMsg & objDocument.Name & vbCrLf
Next objDocument
MsgBox Prompt:=strMsg, Title:="Current Documents Open", Buttons:=vbOKOnly
次の使用例は、 Documents コレクションに新しいドキュメントを追加します。
Dim objDocument As Document
Set objDocument = Documents.Add
With objDocument
.LayoutGuides.Columns = 4
.LayoutGuides.Rows = 9
.ActiveView.Zoom = pbZoomWholePage
End With
次の例では、最初の開いている文書の名前を表示します。
If Documents.Count >= 1 Then
MsgBox Documents.Item(1).Name
End If
次の使用例は、 Documents コレクション内の各ドキュメントの名前を確認します。 ドキュメントの名前がSales.docされている場合、オブジェクト変数 objSalesDoc
は Documents コレクション内のそのドキュメントに設定されます。
Dim objDocument As Document
Dim objSalesDoc As Document
For Each objDocument In Documents
If objDocument.Name = "Sales.doc" Then
Set objSalesDoc = objDocument
End If
Next objDocument
メソッド
プロパティ
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。