🚀 go-pugleaf

Olivier,

I hope this helps!



tell application "InDesign 2.0.2" 
	tell active document 
		set FirstRowColor to color "Black" 
		set SecondRowColor to my myFindTint(document 1, "Black", 10) 
		tell selection 
			set fill color of row 1 to FirstRowColor 
			set fill color of row 2 to SecondRowColor 
		end tell 
	end tell 
end tell

--Handler for finding/returning a given tint swatch  
on myFindTint(myDocument, myColorName, myTintValue) 
	tell application "InDesign 2.0.2" 
		tell myDocument 
			try 
				--Find all of the tints of a given base color.  
				set myTints to tints whose name is myColorName 
				--Iterate through the tints looking for a specific tint value.  
				repeat with myTint in myTints 
					if tint value of myTint is myTintValue then 
						--If the Tint value matches, then we've found our tint swatch.  
						--Use "object reference of" to get a direct reference to the tint object.  
						return object reference of myTint 
						exit repeat 
					end if 
				end repeat 
				--If we made it to this point, we haven't found the tint, so throw an error.  
				error 
			on error 
				--No existing tint with the tint value we're looking for exists, so make one.  
				set myTint to make tint with data {color:color myColorName} 
				set tint value of myTint to myTintValue 
				return myTint 
			end try 
		end tell 
	end tell 
end myFindTint



(This handler is the ONLY way I have managed to work with the tints.)

Kari