ShapeRange.BlackWhiteMode Property

Returns or sets a value that indicates how the specified shape appears when the presentation is viewed in black-and-white mode. Read/write MsoBlackWhiteMode.

Syntax

expression.BlackWhiteMode

expression   A variable that represents a ShapeRange object.

Example

This example sets shape one on wksOne to appear in black-and-white mode. When you view the presentation in black-and-white mode, shape one will appear black regardless of what color it is in color mode.

  Sub UseBlackWhiteMode()
Dim wksOne As Worksheet
Set wksOne = Application.Worksheets(1)
wksOne.Shapes(1).<strong>BlackWhiteMode</strong> = msoBlackWhiteGrayOutline

End Sub

See Also

• ShapeRange Object
• ShapeRange Object Members