1 Reply Latest reply on Jun 13, 2008 4:16 PM by (Archie_Tucker)

    InDesign CS3 VB Set Ink Alias

    Level 1
      How would I set the ink alias (Output panel of the Print dialog box) for all non-process colors to Process Black using VB Script?
      Thanks,
      Archie
        • 1. Re: InDesign CS3 VB Set Ink Alias
          Level 1
          I found the solution:

          Rem SET INKS TO BLACK FUNCTION
          Rem --------------------------
          Function mySetInks (myDocument)

          myInkCount = myDocument.Inks.Count

          For I = 1 to myInkCount

          myInk = myDocument.Inks.Item(I)
          If myDocument.Inks.Item(I).IsProcessInk <> True Then
          myDocument.Inks.Item(I).AliasInkName = "Process Black"
          End If

          Next

          End Function