PrintSeparations.ScreenTechnology

Property ScreenTechnology As String

The ScreenTechnology property returns or sets the screening technology used for printing separations.

To use this property, the AdvancedSettings property must be set to True.

The following code example iterates through the SystemPrinters collection until it finds the specified printer. It enables separations and sets advanced settings. The Print dialog box is then displayed.

Sub Test() 
 Dim prn As Printer 
 Dim intCounter As Integer 
 For intCounter = 1 To Printers.Count 
  Set prn = Printers.Item(intCounter) 
   If prn.Name = "Device Independent PostScript File" Then 
    Exit For 
   End If 
 Next intCounter 
 With ActiveDocument 
  With .PrintSettings 
   Set .Printer = prn 
   With .Separations 
    .Enabled = True 
    .AdvancedSettings = True 
    .ScreenTechnology = "RT Screening - Lino 330" 
    .Resolution = 1270 
    .BasicScreen = "109" 
   End With 
   .ShowDialog 
  End With 
 End With 
End Sub