(DTPtechNote:1113) [AS_InDesign CS] セル属性の操作

[市川せうぞー <anonymous at unknown-host>]

(*
すべての表（テーブル）中の２番目のセルを列のセンターにします。
*)

set cell_no to 2 --２番目のセル
set cnt to 0
tell application "InDesign CS_J"
	tell document 1
		set mytextframes to every text frame
		repeat with i in mytextframes
			set mytables to every table of i
			repeat with ii in mytables
				set vertical justification of cell cell_no of object reference of ii to center align
				set cnt to cnt + 1
			end repeat
		end repeat
		display dialog (cnt & "個のセルを処理しました") as Unicode text
	end tell
end tell