如何从 AppleScript 操作和打印 MS Excel 中的图表？

Question

对于 MS Excel for Mac 2008 中的现有图表，在 AppleScript 中，我尝试做两件事：

1. 将 3D 图表旋转 1°
2. 将图表另存为图像 (png)

从我在 Intertubes 上找到的内容来看，似乎可能的。但 AppleScript 的尴尬冗长和网络上缺乏重要的 MS Excel AppleScript 示例对我来说是难以克服的。

只是为了保存部分，这就是我到目前为止所得到的：

tell application "Microsoft Excel"
    activate object worksheet "iozone-16"
    set cht to chart object 1 of active sheet
    tell cht
        #save as chart object [picture type enumeration] [file name Unicode text]
        #Argh!!! 
    end tell
end tell

“旋转 1°”任务似乎涉及“内部对象”，但这只是我所得到的。我所说的“旋转”是指旋转图表对象本身，而不是图像。这可以通过“设置图表格式”对话框来完成... MS Excel 对话框 http://dietpizza.ch/images/ 3d-rotation-ms-excel-dialog-box.png

通过操纵此值，图表对象会发生如下两个图像所示的变化。 （15° 效果）

MS Excel 3D 图形示例 0 http://dietpizza.ch/图片/3d-rotation-0.png MS Excel 3D 图形示例 1 http://dietpizza.ch/images/3d-rotation- 1.png

Answer 1

通过设置图表对象的chart属性的rotation属性，可以通过AppleScript更改图表的X轴旋转。

下面的 AppleScript 应该可以解决这个问题：

set theImagePath to (path to desktop as text) & "Chart.png"

tell application "Microsoft Excel"
    set theChart to first chart object of first sheet
    set rotation of chart of theChart to 90
    save as picture theChart picture type save as PNG file file name theImagePath
end tell