PictureFormat.Recolor メソッド (Publisher)

文書内の図の色を変更します。

構文

式。色変更 (色、 LeaveBlackPartsBlack)

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

パラメーター

名前	必須 / オプション	データ型	説明
Color	必須	ColorFormat	色変更に使用する色を指定します。
LeaveBlackPartsBlack	必須	MsoTriState	True の 場合、元の画像のすべての部分を黒色の黒のままです。

注釈

Recolor メソッドは、[図の色を変更] ダイアログ ボックス ([書式] メニュー>の [図>の色を変更]) で使用できるオプションに対応します。

例

次の Microsoft Visual Basic for Applications (VBA) マクロは、メソッドを使用して、 色を変更する 画像の色を変更する方法を示しています。 文書の最初のページに 図形 のコレクションの最初の図形を recolors こととします。 コードを実行すた後には、 RestoreOriginalColors メソッドを使用して元の色を戻すことができます。

この使用例が動作するためには、色を変更する図形が、図、または図を表す OLE オブジェクトである必要があります。

Public Sub Recolor_Example() 
 
 Dim pubPictureFormat As Publisher.PictureFormat 
 Dim pubShape As Publisher.Shape 
 Dim pubColorFormat As Publisher.ColorFormat 
 
 Set pubShape = ThisDocument.Pages(1).Shapes(1) 
 
 Set pubPictureFormat = pubShape.PictureFormat 
 Set pubColorFormat = pubShape.Fill.BackColor 
 
 pubPictureFormat.Recolor pubColorFormat, msoTrue 
 
End Sub

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

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