Returns a collection of in-RIP trapping layers
Syntax:
Property Get Layers() As TrapLayers
Remarks:
The Layers property returns a read-only reference to a TrapLayers collection.
Examples:
The following VBA example displays the number of items in the TrapLayers collection.
Sub Test()
With ActiveDocument.PrintSettings.Trapping
  MsgBox .Layers.Count
End With 
End Sub