ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Не работает макрос! Помогите, пожалуйста!
14 сообщений из 14, страница 1 из 1
Не работает макрос! Помогите, пожалуйста!
    #38534569
AlinaMalina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlinaMalina
Гость
Ругается на 7 строку


Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
1 Sub ПостроитьГрафик()

2  nrow = Cells(16, 25).Value + Cells(21, 25).Value
3  ncell = nrow + 1
   
4     If Cells(21, 25).Value = 0 Then
5        Worksheets("График").ChartObjects(2).Chart.SetSourceData Source:=Range("C2:AH2,С" & nrow & ":AH' & ncell")
6       ElseIf Cells(21, 25).Value = 13 Then
7         Worksheets("График").ChartObjects(2).Chart.SetSourceData Source:=Range("C15:G15,С" & nrow & ":G' & ncell")
8     End If
   
9   Worksheets("График").ChartObjects(2).Chart.ChartTitle.Characters.Text = "" & Cells(1 + Cells(21, 25).Value, 1) & ""

10 End Sub

Модератор: Учимся использовать тэги оформления кода - FAQ
...
Рейтинг: 0 / 0
22.01.2014, 16:19
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534582
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
неудивительно, почему у вас nrow вне кавычек, а ncell внутри кавычек?
...
Рейтинг: 0 / 0
22.01.2014, 16:23
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534591
AlinaMalina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlinaMalina
Гость
-
...
Рейтинг: 0 / 0
22.01.2014, 16:27
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534594
AlinaMalina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlinaMalina
Гость
Shocker.Pro,

подскажите, как правильно, пож-та.
...
Рейтинг: 0 / 0
22.01.2014, 16:29
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534606
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Код: vbnet
1.
("C15:G15,С" & nrow & ":G" & ncell)

если вы макрос не сами писали и не понимаете, что написано - вы сразу говорите тогда, чтобы лишних диалогов не вести
...
Рейтинг: 0 / 0
22.01.2014, 16:34
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534608
AlinaMalina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlinaMalina
Гость
Shocker.Pro,
я сама писала.
Просто только начала осваивать VB.
...
Рейтинг: 0 / 0
22.01.2014, 16:36
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534614
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
AlinaMalinaя сама писала.
Просто только начала осваивать VB.тогда лучше бы было проанализировать ответ. Потому как никогда не научитесь, если будете просить других делать все за вас.
...
Рейтинг: 0 / 0
22.01.2014, 16:38
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534619
AlinaMalina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlinaMalina
Гость
Shocker.Pro,
я исправила. Но мне по-прежнему выдает ошибку :
Method 'Range' og object '_Global' failed
...
Рейтинг: 0 / 0
22.01.2014, 16:41
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534700
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Код: vbnet
1.
ChartObjects(2)

а почему вы обращаетесь ко второй диаграмме?
...
Рейтинг: 0 / 0
22.01.2014, 17:41
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534703
AlinaMalina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlinaMalina
Гость
Shocker.Pro,
это я уже справила на 1. Не помогло.
...
Рейтинг: 0 / 0
22.01.2014, 17:44
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534709
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
А еще третий столбец в экселе обозначается латинской "Цэ", а не русской "эС"
...
Рейтинг: 0 / 0
22.01.2014, 17:47
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534715
AlinaMalina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlinaMalina
Гость
Shocker.Pro,
:) но не в этом ошибка
...
Рейтинг: 0 / 0
22.01.2014, 17:52
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534716
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
после всех исправлений, которые я назвал, ваш код у меня выполняется
...
Рейтинг: 0 / 0
22.01.2014, 17:52
| Ответить | Цитировать | Написать  
Не работает макрос! Помогите, пожалуйста!
    #38534729
AlinaMalina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlinaMalina
Гость
Shocker.Pro,
Все работает. Спасибо особенно за Цэ :)
...
Рейтинг: 0 / 0
22.01.2014, 18:02
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Не работает макрос! Помогите, пожалуйста!
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=38534715&tid=2156555]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 32ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 2ms
others: 16ms
total:  139ms
созд. / загр.: 139ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]