Description

The tint percentage of the vertical rule next to the tabulation column.

Syntax

object

Required. Object name, returned by Text.GetTableColumn.

iTint

Color percentage 0 - 100.

Example

This script increments the tint of the vertical rules in the selected column(s) for 10. If it is 100, then it restarts from 0.

Dim objTableCol = Text.GetTableColumn

if objTableCol.HasRuleWidth then

 objTableCol.RuleGray = objTableCol.RuleGray + 10

 if objTableCol.RuleGray = 110 then

         objTableCol.RuleGray = 0

 end if

end if

Text.SetTableColumn (objTableCol)