🚀 go-pugleaf

Kari--

Here's a general-purpose tint-finding handler that behaves a bit better. I have never had much luck getting multiple case filter ("whose") clauses to work.



tell application "InDesign 2.0.1" 
	--Example of calling the tint-finding handler. 
	set myTint to my myFindTint(document 1, "PANTONE 1805 U", 50) 
end tell

--Handler for finding/returning a given tint swatch 
on myFindTint(myDocument, myColorName, myTintValue) 
	tell application "InDesign 2.0.1" 
		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 




Thanks,

Ole