|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
31.08.2009, 16:48 | #1 |
Пользователь
Регистрация: 28.08.2009
Сообщений: 47
|
Запуск макроса
Добрый день!
Во первых поиском пользовался но не нашел тем под мой вопрос: 1. Приведите пример на запуск макроса при появлении в ячейке числа/условия, но на основании результата вычисления формулы. т.е. без непосредственного внесения значения. например: А1= B1+M2, при этом выскакивало сообщение если в A1 появится значение в 2. 2. Как можно запускать макрос используя "флажок" в Excele? Спасибо заранее! |
31.08.2009, 17:19 | #2 |
Участник клуба
Регистрация: 28.06.2009
Сообщений: 1,950
|
Код:
Правой кнопкой - "Назначить макрос" Код:
Последний раз редактировалось motorway; 31.08.2009 в 17:27. |
01.09.2009, 05:15 | #3 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
1. Можно так:
Код:
Если из панели инструментов "Формы", то см. пост выше. А если из "Элементы управления", то в модуле листа выберите требуемый CheckBox и по событию CheckBox1_Click() пропишите код Вашей процедуры. Либо, включите режим конструктора и в нужном CheckBox через правый клик выберите "Исходный текст".
Чем шире угол зрения, тем он тупее.
|
01.09.2009, 11:04 | #4 |
Пользователь
Регистрация: 28.08.2009
Сообщений: 47
|
Код:
Private Sub Worksheet_Change(ByVal Target As Range) If (Mid(Range("A1").Formula, 1, 1) = "=" And Range("A1").Value = 2) Then MsgBox ("2") End Sub 2) Что за флажок? Просто чекбокс на листе? Правой кнопкой - "Назначить макрос" Код: Sub Флажок_Щелчок() If (ActiveSheet.CheckBoxes(1).Value = 1) Then MsgBox ("A") End Sub Спасибо! то что нужно! получилось у меня |
01.09.2009, 11:05 | #5 | |
Пользователь
Регистрация: 28.08.2009
Сообщений: 47
|
Цитата:
|
|
02.09.2009, 12:19 | #6 | |||
Пользователь
Регистрация: 28.08.2009
Сообщений: 47
|
кстати подскажите
Цитата:
Цитата:
Цитата:
а то я так понимаю, он начинает анализировать все файлы открывающиеся |
|||
02.09.2009, 13:21 | #7 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Пропишите требуемый код не в модуле листа (книги), а в общем программном модуле (макрос с каким-нибудь именем). Затем, по событию Worksheet_Calculate запускайте этот макрос, в котором должны присутствовать ссылки на требуемые книги и листы.
Чем шире угол зрения, тем он тупее.
|
02.09.2009, 15:33 | #8 |
Пользователь
Регистрация: 28.08.2009
Сообщений: 47
|
Я так и сделал. но все равно ошибка.
|
03.09.2009, 04:41 | #9 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Тогда давайте пример, и подробно опишите, что нужно сделать.
Чем шире угол зрения, тем он тупее.
|
03.09.2009, 16:55 | #10 |
Пользователь
Регистрация: 28.08.2009
Сообщений: 47
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Автоматический запуск макроса | АлёнаP | Microsoft Office Excel | 4 | 28.03.2010 12:55 |
Запуск макроса по событию | tim13 | Microsoft Office Excel | 5 | 17.08.2009 13:33 |
Запуск макроса с параметрами из другого макроса | Saladin | Microsoft Office Excel | 2 | 19.01.2009 09:43 |
Запуск макроса с книгой | Gawwws | Microsoft Office Excel | 2 | 28.10.2008 11:34 |
Автоматический запуск макроса | Len@ | Microsoft Office Excel | 6 | 23.07.2008 12:05 |