API Documentation > CorelDRAW > 2025-v26 > PrintTrapping > IPrnVBAPrintTrapping
PrintTrapping.ColorScaling property
Specifies trap color reduction percentage
Syntax:
Property Get ColorScaling() As Long
Property Let ColorScaling(ByVal Value As Long)
Remarks:
The ColorScaling property specifies the amount by which the ink color in a trap decreases.
Examples:
The following VBA example displays the current value for color scaling.
Sub Test()
With ActiveDocument.PrintSettings.Trapping
  MsgBox "The current value for color scaling is: " & .ColorScaling
End With 
End Sub