Need Simple Font Script

Scripting Forums AppleScript | Mac OS X
,
#1

Dear Friends:

I need a simple applescript for the Mail app that will set all the text in an email to 12 point verdana. My previous efforts with this have continuously produced syntax errors. I have searched the forum for scripts that come close to this, but they do not work. Thanks!

Sincerely,
Howard

#2

Hi,

Like this?

set myContent to "I need a simple applescript for the Mail app that will set all the text in an email to 12 point verdana. My previous efforts with this have continuously produced syntax errors. I have searched the forum for scripts that come close to this, but they do not work. Thanks!"

tell application "Mail"
	activate
	set newEmail to make new outgoing message with properties {subject:"Test", content:myContent}
	tell newEmail to set visible to true
	
	set size of characters of newEmail's content to 12
	-- set color of characters of newEmail's content to {0, 32896, 16448}
	set font of characters of newEmail's content to "Verdana"
	
	-- this will show in the results pane
	properties of attribute run 1 of newEmail's contents
end tell

Best wishes

John M

#3

John, thank you! this is excellent. Now my remaining question is how do I modify this script so it acts on an already composed email. I’m not sure how to reference the frontmost window message. If anyone can supply that line of code, I’d be most appreciative.

Sincerely,
Howard