CreatePlateCollection Method

collection that represents a new collection of plates for commercial print separations.

expression.CreatePlateCollection(Mode)

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

Mode   Required PbColorMode. Indicates the type of plates to create.

Example

This example creates a new spot-color plate collection and adds a plate to it.

Sub AddNewPlates()
    Dim plts As Plates
    Set plts = ActiveDocument.CreatePlateCollection(pbColorModeSpot)
    plts.Add
    With plts(1)
        .Color.RGB = RGB(Red:=255, Green:=0, Blue:=0)
        .Luminance = 4
    End With
End Sub