Правая вертикальная ось и Excel

← →
lookin © (2005-06-04 23:42) [0]

Задача: нарисовать график по правой (вспомогательной) оси в Excel-диаграмме.

Делаю: проверяю свойство Chart[0].Series[0].VertAxis = aRightAxis и назначаю в Excel

Excel.Workbooks[k].Sheets[j].ChartObjects[z].Chart.SeriesCollection[n].AxisGroup = 2 (вспомогательная ось).

Однако график рисуется все равно по левой оси...

Как можно исправить ситуацию?

← →
Суслик © (2005-06-05 10:11) [1]

ну ты макрос запиши сделав действия, приводящие к нужному тебе результату, посмотри какой код vb будет создан, переведи в delphi.

← →
lookin © (2005-06-05 10:20) [2]

[1] Суслик © (05.06.05 10:11)

Не оригинально. Это я первым делом и сделал... Смысл в том, что переведенный на Дельфи вариант Бейсика как раз и не работает. Без ошибок, но не работает как надо...

← →
lookin © (2005-06-05 10:24) [3]

[1] Суслик © (05.06.05 10:11)

Иначе говоря, вот эта строчка в VB делает что надо, а в Дельфи - не делает...

Excel.Workbooks[k].Sheets[j].ChartObjects[z].Chart.SeriesCollection[n].AxisGroup = 2 (вспомогательная ось).

Все другие работы над объектом Excel.Workbooks[k].Sheets[j].ChartObjects[z].Chart.SeriesCollection[n] идут без промаха...

← →
Суслик © (2005-06-05 10:29) [4]

> [3] lookin © (05.06.05 10:24)

причем здесь оригинальность?
тогда вряд ли помогу (((, т.к. обычно макрос переводился у меня без проблем.

← →
lookin © (2005-06-05 10:32) [5]

[4] Суслик © (05.06.05 10:29)
>>причем здесь оригинальность?

В смысле я не ленивец, это само собой сделано было в первую очередь...

>>тогда вряд ли помогу

Если не очень сложно и есть время, то можете у себя проверить работу этого свойства (AxisGroup) через Дельфи? А то вроде я все сделал по правилам, а нифига не функционирует. Почему то все остальное работает, а это - нет. Весь исполняемый код могу кинуть, чтобы самому не делать.

Может быть, у меня эксель кривоват. Тормозит сам по себе. Переставлял - не помогает. Может в этом дело (хотя чрезвычайно маловероятно)...

Правая вертикальная ось и Excel Найти похожие ветки