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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 08.05.2009, 00:36   #1
Pavel_Ine
Пользователь
 
Аватар для Pavel_Ine
 
Регистрация: 18.04.2009
Сообщений: 24
По умолчанию Построение графика нажатием на кнопку

Есть таблица 2х100 целых значений.
Нужно, чтобы по щелчку на кнопке строились диаграмма, содержащая 2 простых графика. При чем, чтоб первый ряд назывался "Красный", а второй "Синий".
Pavel_Ine вне форума Ответить с цитированием
Старый 08.05.2009, 03:33   #2
Megapixar
Пользователь
 
Регистрация: 06.01.2009
Сообщений: 13
По умолчанию

Вот документ, останеться подставить ваши значения
Вложения
Тип файла: rar 111.rar (12.5 Кб, 36 просмотров)
Megapixar вне форума Ответить с цитированием
Старый 08.05.2009, 15:13   #3
Pavel_Ine
Пользователь
 
Аватар для Pavel_Ine
 
Регистрация: 18.04.2009
Сообщений: 24
По умолчанию

Спасибо, но почему-то не узнает он (ексель) метод

ActiveSheet.Shapes.AddChart.Select

У меня ексель 2003, наверное по-этому не хочет принимать.
Pavel_Ine вне форума Ответить с цитированием
Старый 08.05.2009, 15:48   #4
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,858
По умолчанию

Замени строку ActiveSheet.Shapes.AddChart.Select
на строку Charts.Add.Select

PS: Будет лучше, если ты будешь выкладывать пример файла, объясняя на примере этого файла, на основании каких данных надо построить диаграмму, чтобы не приходилось воссоздавать файл.
EducatedFool вне форума Ответить с цитированием
Старый 08.05.2009, 16:18   #5
Pavel_Ine
Пользователь
 
Аватар для Pavel_Ine
 
Регистрация: 18.04.2009
Сообщений: 24
По умолчанию

Спасибо, все ОК!

А еще вопросик: как с помощью Range выделять не в виде Range("Лист1!$A$2:$CW$3"), а в виде что-то типа Range("Лист1!(1,2)5,10)"), т.е. адрес начальной и конечной ячейки задаются не в виде А2, а в виде
(1, 2)?
Pavel_Ine вне форума Ответить с цитированием
Старый 08.05.2009, 16:46   #6
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,858
По умолчанию

Код:
Sub test()
    Range(Cells(1, 1), Cells(5, 10)).Select  ' с ячейки (1,1) по ячейку (5,10)
    ' или так:
    Cells(3, 6).Resize(5, 10).Select    ' с ячейки (3,6) по ячейку (7,15)
End Sub
Есть ещё десяток других способов.
EducatedFool вне форума Ответить с цитированием
Старый 08.05.2009, 21:09   #7
Pavel_Ine
Пользователь
 
Аватар для Pavel_Ine
 
Регистрация: 18.04.2009
Сообщений: 24
По умолчанию

спасибо, мне хватит одного
Pavel_Ine вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Построение графика kzmd Общие вопросы Delphi 1 19.01.2009 09:36
построение графика deadh5n1 Помощь студентам 2 13.09.2008 19:06
(С++) Построение графика tg(x)=y. Panterka Помощь студентам 2 13.12.2007 09:32
Построение графика KARSH Общие вопросы Delphi 3 28.05.2007 17:05
Построение Графика Боня Помощь студентам 3 20.01.2007 19:32