InDesign + vbscript(その2:textFrameの追加とか)
‘———InDesignの起動
Set myInDesign = CreateObject(”InDesign.Application.CS2_J”)
Set myDoc = myInDesign.ActiveDocument‘—-textFrameを追加して任意の座標・色・濃淡・透明度等を再設定
set myObj = myDoc.textFrames.add()myObj.ContentType = 1735553140 ’型:グラフィック
myObj.GeometricBounds=Array(y1, x1 ,y2, x2) ’座標:top/left/bottom/right
myObj.FillColor = myDoc.Colors.Item(”Black”) ’色:黒
myObj.FillTint = 20 ’濃淡:→灰色
myObj.opacity = 50 ’透明度:50%=半透明
myObj.Label = “Frame1″ ’スクリプトラベルへの書き込み