ColorType Property [Excel 2003 VBA Language Reference]

MsoPictureColorType

MsoPictureColorType can be one of these MsoPictureColorType constants.
msoPictureAutomatic
msoPictureBlackAndWhite
msoPictureGrayscale
msoPictureMixed
msoPictureWatermark

expression.ColorType

expression Required. An expression that returns one of the objects in the Applies To list.

Example

This example sets the color transformation to grayscale for shape one on myDocument. Shape one must be either a picture or an OLE object.

Set myDocument = Worksheets(1)
myDocument.Shapes(1).PictureFormat.ColorType = msoPictureGrayScale

Applies to | Graphic Object | PictureFormat Object