Как манипулировать и распечатать диаграмму в MS Excel из AppleScript?

Question

С существующей диаграммой в MS Excel для Mac 2008 в AppleScript я пытаюсь сделать две вещи:

1. Поворот 3D-диаграммы на 1 °
2. Сохранить диаграмму как изображение (png)

Из того, что я нашел на Intertubes, это кажется возможным. Но неловкое многословие AppleScript и отсутствие в Интернете нетривиальных примеров AppleScript для MS Excel - это слишком много, чтобы я мог их преодолеть.

Только для спасительной части, вот что у меня есть:

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/images/3d-rotation-0.png Пример графика MS Excel 3D 1 http://dietpizza.ch/images/3d-rotation-1.png

Answer 1

Вращение оси X диаграммы можно изменить с помощью AppleScript, установив свойство rotation свойства chart chart object.

. Следующий 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