Changing Font and Size of Footer in Powerpoint Doc?

Scripting Forums AppleScript | Mac OS X
#1

Hey guys,

Ok, so I have this great automator workflow that basically creates a powerpoint of a bunch of photos I have.

I currently have it set up to insert a footer, which is fine.

But the automator action Set Footer for Powerpoint Slides does not allow you to set the Font and Size of the text in the footer.

So obviously this will have to get done with applescript.

After the Set Footer for Powerpoint Slides action is executed, I have the following applescript that runs:

on run {input, parameters}
	
	set imgWidth to (8 * 70)
	tell application "Microsoft PowerPoint"
		activate
		tell active presentation
			set slideCount to count slides
			set {height:slideHeight, width:slideWidth} to slide master of slide 1
			repeat with a from 1 to slideCount
				tell picture 1 of slide a
					set width to imgWidth
					set properties to {top:((slideHeight - height) div 3), left position:((slideWidth - imgWidth) div 2)}
				end tell
			end repeat
		end tell
	end tell
	return input
end run

Now my question is where would I put int the above applescript the script to change the font and size of the text in the footers?

Thanks!

Phil

#2

this may help

http://www.mactech.com/articles/mactech/Vol.23/23.03/23.03AppleScriptPowerPoint/index.html

#3

Hey man thank you so much.

It works now.

Here is the final script:


tell application "Microsoft PowerPoint"
	
	tell active presentation
		set theSlideCount to count slides
		repeat with a from 1 to theSlideCount
			tell font of text range of text frame of shape 2 of slide a
				set font name to "palatino"
				set font size to 14
				set font color to {0, 0, 0}
			end tell
		end repeat
	end tell
	
end tell