Select Specific Text Based on Font

Hi!

Is there a way to select certain words of a text based on their font? I’m copying all text from safari and pasting it into word. The text that I want are in Helvetica, everything else is in Lucida Grande. Is there a way to only select words using Helvetica and copy that into a new document?

Here’s the script I’m trying to fix:

tell application "Microsoft Word" to activate
tell application "System Events"
	tell process "Microsoft Word"
		select (every word of document whose fonts folder is "Helvetica")
	end tell
	keystroke "c" using command down
	keystroke "n" using command down
	keystroke "v" using command down
end tell

Any help would be great!