Objeto Plates (Publisher)
Uma coleção de objetos Plate em uma publicação.
A coleção de chapas é composta de objetos Plate para os vários modos de cor da publicação. Cada publicação só pode usar um modo de cor. Por exemplo, você não pode especificar o modo de cor especial em um procedimento e depois, especificar o modo de cor de escala.
Use o método Add para adicionar uma nova placa à coleção Plates .
Use o método FindPlateByInkName para retornar uma chapa específica chamando seu nome de tinta. Cores de escala são atribuídas a diferentes números de índice da coleção Plates que na coleção PrintablePlates.
Use o método FindPlateByInkName para garantir que o objeto Plate desejado seja acessado.
Este exemplo cria uma nova coleção de chapa de cor especial e adiciona uma chapa a ela.
Sub AddNewPlates()
Dim plts As Plates
Set plts = ActiveDocument.CreatePlateCollection(Mode:=pbColorModeSpot)
plts.Add
With plts(1)
.Color.RGB = RGB(Red:=255, Green:=0, Blue:=0)
.Luminance = 4
End With
End Sub
Este exemplo cria uma coleção de chapa de cor especial, adiciona duas chapas a ela e insere essas chapas no modo de cor especial.
Sub CreateSpotColorMode()
Dim plArray As Plates
With ThisDocument
'Creates a color plate collection,
'which contains one black plate by default
Set plArray = .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
.EnterColorMode Mode:=pbColorModeSpot, Plates:=plArray
End With
End Sub
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.