Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 04.09.2008, 16:57   #1
Bu$ter
Пользователь
 
Аватар для Bu$ter
 
Регистрация: 16.05.2008
Сообщений: 73
По умолчанию Код для диаграммы

Народ HELP

Хочу написать макрос для диаграммы. Смысл вот в чем:
Имеем 2 лист, на первом 2 столбца, причем еженедельно снизу добавляется новое значение. На втором диаграмма.

Так вот задача - как должен выглядеть макрос для построения диаграммы, который бы автоматически включал в область данных диаграммы весь столбец данных (типа Selection.End(xlDown)).

Пытаюсь активировать диаграмму с помощью свойства activateWorksheets("Диаграмма").C hartObjects("Диагр).Activate - не работает

Пример прикрепляю...
Вложения
Тип файла: rar задача.rar (14.1 Кб, 14 просмотров)
Bu$ter вне форума
Старый 04.09.2008, 21:37   #2
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

Посмотрите вот это Как программно обновить уже построенную диаграмму, там же есть рабочие примеры.
Думаю, это и будет ответом на Ваш вопрос.
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499
VictorM вне форума
Старый 05.09.2008, 11:30   #3
Bu$ter
Пользователь
 
Аватар для Bu$ter
 
Регистрация: 16.05.2008
Сообщений: 73
По умолчанию

<Благодарю за ответ.

Возник встречный вопрос

Строка макроса:

Код:

ActiveChart.SetSourceData Source:=Sheets(1).Range(Cells(6, 60), Cells(z + 5, 61)), PlotBy:=xlColumns
Можно ли в данном случае прописывать диапазон для объекта Range через Cells?

А то выдает ошибку1004 - что cells в данном случае употреблять нельзя.
Дело в том диапазон данных постоянно увеличивается, поэтому я ввел переменную z, которая рассчитывается по своему правилу. Мне необходимо чтобы количество строк в диапазоне постоянно изменялось, то есть зависило от переменной z.
Подскажите как это можно реализовать.

Спасибо
Bu$ter вне форума
Старый 05.09.2008, 11:44   #4
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

да нет, можно и так.
Только тогда нужно написать так
Код:
Sheets(1).Range(Sheets(1).Cells(6, 60), Sheets(1).Cells(z + 5, 61))
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499
VictorM вне форума
Старый 05.09.2008, 12:29   #5
Bu$ter
Пользователь
 
Аватар для Bu$ter
 
Регистрация: 16.05.2008
Сообщений: 73
Радость

Спасибо большое

Все заработало!!!!!!!
Bu$ter вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Составление диаграммы Иля Microsoft Office Excel 1 06.04.2008 18:08
Диаграммы vvovik Компоненты Delphi 1 15.02.2008 19:12
Построение диаграммы на С Raptor Помощь студентам 2 04.12.2007 10:15
Построение диаграммы Владислав Крюков Microsoft Office Excel 12 14.11.2007 23:50
Диаграммы, легенда с 2 сторон. WIC Microsoft Office Excel 8 02.10.2007 17:17