我需要更改所选(形状)文本框背景和外线颜色,我们该怎么做?
答案 0 :(得分:1)
这是一个例子
tell application "Microsoft PowerPoint"
activate
set theShapeRange to shape range of selection of active window
set n to (count shapes of theShapeRange)
repeat with i from 1 to n
tell shape i of theShapeRange
set back color of fill format of it to {0, 200, 255}
set fore color of line format of it to {255, 0, 0}
end tell
end repeat
end tell