Страница:
Страница:
Вопрос: графики в экселе
Добавлено: 19.11.10 11:42
Автор вопроса: jamba1919
Добрый день!
необходимо перенести данные из VB6 to Excel 7
в графике.
создаю лист эксель
Dim Ex As Object
Set Ex = CreateObject("Excel.Application")
Ex.Visible = True
Ex.Workbooks.Add
Ex.Sheets.Add 'Äîáàâëÿåò ëèñò
добавляю данные на лист
=
=
=
затем по записаной таблице пытаюсь нарисовать график
делаю запись макроса и переношу в VB6
но не все работает
это работает
Ex.ActiveSheet.Range("L2:P156").Select
Ex.ActiveSheet.Shapes.AddChart.Select
Ex.ActiveSheet.ChartObjects("Chart 1").Activate
а это например нет
ActiveChart.Axes(xlValue).MinimumScale = 99.65
и так нет
Ex.ActiveSheet.ActiveChart.Axes(xlValue).MinimumScale = 99.65
т.е все действия в направлении ActiveChart
выдают ошибку.
Подскажите пожалуйста как правильно сделать?
Ответы
Всего ответов: 0