Excel VBA: есть ли способ форматировать оси диаграммы только через VBA?

Question

Мне нужно составить столбчатые диаграммы в Excel, используя только VBA (без ввода данных пользователем). Я хотел отформатировать метки оси X так, чтобы выравнивание для каждой метки стало -270 градусов. (Это можно сделать вручную, изменив свойство «Пользовательский угол» на вкладке «Выравнивание» в диалоговом окне «Формат оси».) Я попытался записать макрос для этого, но Excel, похоже, не записывает выравнивание шаг. Кто-нибудь знает, как это сделать только с VBA?

Answer 1

Если вы используете Excel 2007, попробуйте использовать более раннюю версию, потому что макрос-рекордер 2007 немного поврежден.

Это то, что я получил:

ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.Axes(xlCategory).Select
Selection.TickLabels.Orientation = xlUpward

Answer 2

ActiveChart.Axes(xlCategory).TickLabels.Orientation = 67