次の方法で共有


Page.Background プロパティ (Visio)

ページが背景ページであるかどうかを判別します。 値の取得と設定が可能です。

構文

背景

Page オブジェクトを表す変数。

戻り値

整数

注釈

校正履歴のページの Background プロパティは常に True にする必要があります。

次の Microsoft Visual Basic for Applications (VBA) マクロは、図面のページを 1 ページずつ処理して、それぞれのページが前景ページであるか、背景ページであるかを判別します。 前景ページはリスト ボックスに表示されます。 このマクロを実行するには、まず、プロジェクトにリスト ボックス コントロールを含むユーザー フォームを挿入する必要があります。

 
Public Sub Background_Example() 
 
 Dim vsoPages As Visio.Pages 
 Dim vsoPage As Visio.Page 
 Dim intCounter As Integer 
 
 'Get the Pages collection. 
 Set vsoPages = ThisDocument.Pages 
 
 'Make sure the list box is cleared. 
 UserForm1.ListBox1.Clear 
 
 'Iterate through the collection. 
 For intCounter = 1 To vsoPages.Count 
 
 'Retrieve the Page object at the current index. 
 Set vsoPage = vsoPages(intCounter) 
 
 'Check whether the current page is a background page. 
 'Display the names of all the foreground pages. 
 If vsoPage.Background = False Then 
 
 UserForm1.ListBox1.AddItem vsoPage.Name 
 
 End If 
 
 Next intCounter 
 
 'Display the user form. 
 UserForm1.Show 
 
End Sub

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

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