次の方法で共有


ColorScheme.Colors プロパティ (Publisher)

指定された配色パターンからの色を表す ColorFormat オブジェクトを取得します。

構文

Colors (ColorIndex)

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

パラメーター

名前 必須 / オプション データ型 説明
ColorIndex 必須 PbSchemeColorIndex 配色パターンでの機能に基づいて取得する配色パターンの色を指定します。 Microsoft Publisher タイプ ライブラリで宣言されている PbSchemeColorIndex クラスの定数のいずれかを指定できます。

戻り値

ColorFormat

次の例では 、ColorSchemes コレクションをループし、続くハイパーリンクの色が RGB 値 128 の色と一致する配色を探します。

Dim cscLoop As ColorScheme 
Dim colTemp As ColorFormat 
 
For Each cscLoop In Application.ColorSchemes 
 With cscLoop 
 Set colTemp = .Colors(ColorIndex:=pbSchemeColorFollowedHyperlink) 
 If colTemp.RGB = RGB(128, 0, 0) Then 
 Debug.Print "Color scheme '" & .Name _ 
 & "' has a followed hyperlink " _ 
 & "color matching RGB(128, 0, 0)" 
 End If 
 End With 
Next cscLoop

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

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