返回或设置指定图片或 OLE 对象的颜色转换类型。MsoPictureColorType，可读写。
| MsoPictureColorType 可以是下列 MsoPictureColorType 常量之一： |
| msoPictureAutomatic |
| msoPictureBlackAndWhite |
| msoPictureGrayscale |
| msoPictureMixed |
| msoPictureWatermark |
expression.ColorType
expression 必需。该表达式返回“应用于”列表中的一个对象。
该示例将活动文档中的第一个图形设置为灰度显示。该图形必须是一张图片或一个 OLE 对象。
Dim docActive As Document
Set docActive = ActiveDocument
docActive.Shapes(1).PictureFormat.ColorType = _
msoPictureGrayScale