🚀 go-pugleaf

OK, I actually tested it this time. I think the 30470 comes from trying to transform group contents when it's already been done. And I've changed the text frame bit; what I swear was once working no longer is.



 
tell application "InDesign 2.0.2" 
	set myFrame to item 1 of selection 
	if class of myFrame is not in {group, table} then 
		set theProps to properties of myFrame 
		set thePercent to vertical scale of theProps 
		if page item 1 of myFrame exists then 
			try 
				set myVScale to absolute vertical scale of myPic 
				set myHScale to absolute horizontal scale of myPic 
				set picBounds to geometric bounds of myPic 
			end try 
		end if 
		--Beware line breaks: Following line should start with "set theProps" and ends with "& theProps"   
		set theProps to {absolute vertical scale:nothing, vertical scale:100, absolute horizontal scale:nothing, horizontal scale:100, stroke weight:thePercent * (stroke weight of theProps) / 100, corner radius:thePercent * (corner radius of theProps) / 100} & theProps 
		set properties of myFrame to theProps 
		try 
			--Beware line breaks: Following line should start with "set" and ends with "picBounds}"   
			set properties of page item 1 of myFrame to {absolute vertical scale:thePercent * myVScale / 100, absolute horizontal scale:thePercent * myHScale / 100, geometric bounds:picBounds} 
		end try 
	else if class of myFrame is group then 
		try -- next line will fail if group is already at 100% 
			transform group contents myFrame 
			set allItems to all page items of myFrame 
			repeat with i from 1 to count of allItems 
				if class of item i of allItems is text frame then 
					scale text attributes item i of allItems 
				end if 
			end repeat 
		end try 
	end if 
end tell 




Shane