EnterColorMode Method

expression.EnterColorMode(Mode, Plates)

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

Mode   Required PbColorMode. The color mode.

Plates   Optional Variant. The plates associated with the color mode. Plates are ignored if the color mode is set to pbColorModeDesktop.

Remarks

You can only enter one of the color modes specified by the Mode argument for each publication. Therefore, if you write a procedure to enter the spot color mode and then write another procedure to enter the black-and-white color mode, only the first procedure executed will run correctly.

Example

This example creates a spot-color plate collection, adds two plates to it, and then enters those plates into the spot color mode.

Sub CreateSpotColorMode()
    Dim plArray As Plates

    'Creates a color plate collection,
    'which contains one black plate by default
    Set plArray = ThisDocument.CreatePlateCollection(Mode:=pbColorModeSpot)

    'Sets the plate color to red
    plArray(1).Color.RGB = RGB(255, 0, 0)

    'Adds another plate, black by default and
    'sets the plate color to green
    plArray.Add
    plArray(2).Color.RGB = RGB(0, 255, 0)

    'Enters spot-color mode with above
    'two plates in the plates array
    ThisDocument.EnterColorMode Mode:=pbColorModeSpot, Plates:=plArray
End Sub