| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Правая вертикальная ось и Excel
lookin © (2005-06-04 23:42:00)Задача: нарисовать график по правой (вспомогательной) оси в Excel-диаграмме.
Делаю: проверяю свойство Chart[0].Series[0].VertAxis = aRightAxis и назначаю в Excel
Excel.Workbooks[k].Sheets[j].ChartObjects[z].Chart.SeriesCollection[n].AxisGroup = 2 (вспомогательная ось).
Однако график рисуется все равно по левой оси...
Как можно исправить ситуацию?
lookin (2005-06-05 10:43:00) [1][7] Суслик © (05.06.05 10:40)
И на этом спасибо... В понедельник на другой машине с другим офисом проверю...
Суслик (2005-06-05 10:40:00) [2]
> [6] lookin © (05.06.05 10:33)
я бы рад помочь (честно), но сейчас не могу - голова другим забита
lookin (2005-06-05 10:33:00) [3]Может быть, у меня эксель кривоват. Тормозит сам по себе. Переставлял - не помогает. Может в этом дело (хотя чрезвычайно маловероятно)...
lookin (2005-06-05 10:32:00) [4][4] Суслик © (05.06.05 10:29)
>>причем здесь оригинальность?
В смысле я не ленивец, это само собой сделано было в первую очередь...
>>тогда вряд ли помогу
Если не очень сложно и есть время, то можете у себя проверить работу этого свойства (AxisGroup) через Дельфи? А то вроде я все сделал по правилам, а нифига не функционирует. Почему то все остальное работает, а это - нет. Весь исполняемый код могу кинуть, чтобы самому не делать.
Суслик (2005-06-05 10:29:00) [5]
> [3] lookin © (05.06.05 10:24)
причем здесь оригинальность?
тогда вряд ли помогу (((, т.к. обычно макрос переводился у меня без проблем.
lookin (2005-06-05 10:24:00) [6][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] идут без промаха...
lookin (2005-06-05 10:20:00) [7][1] Суслик © (05.06.05 10:11)
Не оригинально. Это я первым делом и сделал... Смысл в том, что переведенный на Дельфи вариант Бейсика как раз и не работает. Без ошибок, но не работает как надо...
Суслик (2005-06-05 10:11:00) [8]ну ты макрос запиши сделав действия, приводящие к нужному тебе результату, посмотри какой код vb будет создан, переведи в delphi.
| |
