🚀 go-pugleaf

Just in case somebody wants to change tint; only way I have succeed is by using Ole's handler:



tell application "InDesign 2.0.2" 
	tell document 1 
		set myOldTint to my myFindTint(document 1, "PANTONE 1805 U", 4) 
		set myNewTint to my myChangeTint(document 1, "PANTONE 1805 U", 5) 
		delete myOldTint replacing with myNewTint 
	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

			end try 
		end tell 
	end tell 
end myFindTint

--Handler for changing a given tint swatch  
on myChangeTint(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 myChangeTint



�but this works only if you have colors to be changed in your swatches palette.

My question is: does somebody know how to find and change color that is in your document, but not in your swatches palette.

Kari