Find/Change All Text

I am in need of a script and I can’t seem to get it. I need it to find all text that is the [Paper] swatch and change it to a spot swatch called “Custom Black”.

This is what I have so far but it doesn’t want to work.


tell application "Adobe InDesign CC 2015"
	activate
	tell document 1
		set changeSwatch to swatch "Through Cut"
		set findSwatch to swatch "Black"
		set properties of every word of every story whose fill color is findSwatch to {fill color:changeSwatch}
	end tell
end tell

SOLVED


tell application "Adobe InDesign CC 2015"
	set find text preferences to nothing
	set change text preferences to nothing
	
	set find what of find text preferences to ""
	set change to of change text preferences to ""
	
	set properties of find text preferences to {fill color:"Paper"}
	set properties of change text preferences to {fill color:"White"}
	set myFoundItems to change text
end tell