ColorSchemes オブジェクト (Publisher)
すべての ColorScheme コレクション Microsoft Publisher のオブジェクトです。 各 ColorScheme オブジェクトは、パブリケーションで使用される色のセットである配色パターンを表します。
注釈
Publisher で使用できる配色の数を返すには、 Count プロパティを使用します。
ColorSchemes コレクションから特定の配色を取得するには、 Item プロパティを使用します。 Item プロパティの Index 引数には、配色の数値または名前、または PbColorScheme 定数を指定できます。
配色名を取得するには、 Name プロパティを使用します。
例
次の例では、配色の数を表示します。
Sub CountColorSchemes()
MsgBox Application.ColorSchemes.Count
End Sub
次の例では、作業中の文書の配色を Wildflower に設定します。
Sub SetColorScheme()
ActiveDocument.ColorScheme _
= ColorSchemes.Item(pbColorSchemeWildflower)
End Sub
次の例では、Publisher で使用できる配色をすべてテキスト ボックスに一覧表示します。
Sub ListColorShemes()
Dim clrScheme As ColorScheme
Dim strSchemes As String
For Each clrScheme In Application.ColorSchemes
strSchemes = strSchemes & clrScheme.Name & vbLf
Next
ActiveDocument.Pages(1).Shapes.AddTextbox( _
Orientation:=pbTextOrientationHorizontal, _
Left:=72, Top:=72, Width:=400, Height:=500).TextFrame _
.TextRange.Text = strSchemes
End Sub
プロパティ
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。