PrintSeparations.SpotToCMYK

Property SpotToCMYK As Boolean

The SpotToCMYK property determines whether spot colors are converted to process colors.

The following code example creates a new document containing four rectangles with PANTONE fills. It then enables separations, converts PANTONE colors to CMYK, and displays the Print dialog box.

Sub Test() 
 Dim doc As Document 
 Dim s As Shape 
 Set doc = CreateDocument 
 With doc 
  Set s = .ActiveLayer.CreateRectangle(0.965591, 10.351969, 
2.781969, 8.535591, 0, 0, 0, 0) 
  s.Fill.UniformColor.FixedAssign cdrPANTONECoated, 12 
  s.Outline.Type = cdrNoOutline 
  Set s = .ActiveLayer.CreateRectangle(4.747638, 10.327087, 
6.564016, 8.510709, 0, 0, 0, 0) 
  s.Fill.UniformColor.FixedAssign cdrPANTONECoated, 60 
  s.Outline.Type = cdrNoOutline 
  Set s = .ActiveLayer.CreateRectangle(1.09, 7.067559, 2.93126, 
5.226299, 0, 0, 0, 0) 
  s.Fill.UniformColor.FixedAssign cdrPANTONECoated, 120 
  s.Outline.Type = cdrNoOutline 
  Set s = .ActiveLayer.CreateRectangle(4.424173, 7.191969, 6.389843, 
5.226299, 0, 0, 0, 0) 
  s.Fill.UniformColor.FixedAssign cdrPANTONECoated, 180 
  s.Outline.Type = cdrNoOutline 
  With .PrintSettings 
   With .Separations 
    .Enabled = True 
    .SpotToCMYK = True 
   End With 
   .ShowDialog 
  End With 
 End With 
End Sub