PrintSeparations.Hexachrome

Property Hexachrome As Boolean

The Hexachrome property determines whether PANTONE Hexachrome process colors are used.

The following code example creates two rectangles with uniform fills. It then enables separations and Hexachrome colors. The Print dialog box is then displayed.

Sub Test() 
 Dim s As Shape 
 Set s = ActiveLayer.CreateRectangle(1.239291, 7.590079, 4.050945, 
4.778425, 0, 0, 0, 0) 
 s.Fill.UniformColor.CMYKAssign 100, 0, 0, 0 
 s.Outline.Type = cdrNoOutline 
 Set s = ActiveLayer.CreateRectangle(2.607795, 6.395748, 5.344803, 
3.65874, 0, 0, 0, 0) 
 s.Fill.UniformColor.CMYKAssign 0, 100, 0, 0 
 s.Outline.Type = cdrNoOutline 
 With ActiveDocument 
  With .PrintSettings 
   .Separations.Enabled = True 
   .Separations.Hexachrome = True 
   .ShowDialog 
  End With 
 End With 
End Sub