如何使用 applescript 更改 powerpoint 文本框背景颜色?

how to change powerpoint text box background color using applescript?

我需要更改选定的(形状)文本框背景和外线颜色,我们该怎么做?

这是一个例子

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