Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Запуск макроса не автоматически, а через кнопку
 
#1
07.06.2013 16:38:47
Помогите есть макрос который записывает данные из одной ячейки в другую ячейку автоматически надо, что бы он начинал переносить данные не автоматически , а только при его запуске макроса . Например через кнопку. Прикладываю файл с примером и пояснением.
 
 
 
#2
07.06.2013 17:06:31
У вас код этого макроса записан в модуле листа. Вы его оттуда выньте, обзовите как-нибудь по-другому, засуньте в стандартный модуль проекта и привяжите к кнопке (или просто через Alt+F8 запускайте).
Кому решение нужно - тот пример и рисует.
 
 
 
#3
07.06.2013 17:18:12
Не получается. Если можно напишите в примере.
 
 
 
#4
07.06.2013 18:30:45
вариант
 
 
 
#5
08.06.2013 21:05:54
Спасибо , но не работает. Кто знает ,как сделать подскажите.
 
 
 
#6
08.06.2013 21:08:13
Нужно разрешить работу макросов, изменив уровень безопасности.
Вкладка Разработчик-Безопасность_макросов.
 
 
 
#7
08.06.2013 21:21:30
У меня макросы работают. Может быть я не правильно сформулировал задачу. Например вносим в графу приход Столбец I.или Столбец J или K  Внес несколько значений если неправильно внес корректировку. А потом нажал на кнопку и произошло оприходование или списание или бронь.
 
 
 
#8
09.06.2013 11:59:50
Цитата
s260190 пишет:
Спасибо , но не работает.
что именно не работает? Там суть такая нажимаешь кнопку Вкл. и ваш макрос будет работать. нажимаешь Выкл. и можно делать в таблице что хотите макрос работать не будет. вник в сообщение №7  - да макрос не тот.  :)
Изменено: V - 09.06.2013 12:02:39
 
 
 
#9
09.06.2013 12:21:21
Неправильно Вы хотите :)
Или опишите задачу полностью, с подробностями.
 
 
 
#10
09.06.2013 13:45:40
У меня есть три столбца "Вносим приход", "Вносим расход" и "Вносим бронь". Сейчас если я вношу в них изменения, то эти числа автоматически переносятся в  "Приход", "Расход" и "Бронь". Мне бы хотелось, что бы когда я вношу в столбцы "Вносим приход", "Вносим расход" и "Вносим бронь". Они автоматически не перемещались для того чтобы можно было сделать корректировку.Когда корректировка сделана. Нажимаю например кнопку "Оприходование" и тогда данные переносятся  в столбцы "Приход", "Расход" и "Бронь".
Смысл этой кнопки возможность корректировки данных без автоматического занесения, а только через кнопку.
 
 
 
#11
09.06.2013 19:56:26
Если в автоматическом режиме всё работает правильно, то просто перенести код (но уже без Target) из событийной процедуры в стандартный модуль и повесить его на кнопку.
Только возникает вопрос: если раньше макрос знал, какую строку копировать, то каким образом дать ему понять, - КАКУЮ из строк он должен скопировать. Вариант: отталкиваться от активной ячейки.
 
 
 
#12
10.06.2013 11:42:50
Подскажите , как правильно скорректировать макрос:
Код
Private Sub Worksheet_Change(ByVal Target As Excel.Range)

    If Not Intersect(Target, Range("I6:K100")) Is Nothing Then
        If IsNumeric(Target.Value) Then
            Application.EnableEvents = False
            Target.Offset(0, 3).Value = Target.Offset(0, 3).Value + Target.Value
            Application.EnableEvents = True
        End If
    End If
End Sub
Что у меня не получается. Перемещаю его в модуль. А как макрос он не показывается.
Изменено: Владимир S - 17.04.2023 14:52:31
 
 
 
#13
10.06.2013 13:02:41
1.Не показывается потому, что его маскирует слово Private.
2. От Target нужно избавиться (я уже говорил про это).
3. Вы не ответили на вопрос по поводу строки.
А теперь у меня ещё вопрос: ПОЧЕМУ я Вам должен ОТВЕЧАТЬ, если Вы не отвечаете мне?
 
 
 
#14
10.06.2013 13:18:23
Извините, что не ответил, просто ни как не могу сообразить.Только в этом причина.
 
 
 
#15
10.06.2013 13:20:47
Думайте - макросу ведь как-то нужно объяснить - КАКУЮ строку обработать. Вариант: обрабатывать ВСЕГДА последнюю строку.
 
 
 
#16
10.06.2013 21:14:16
Я думал, что можно сделать внес корректировку нажал на "Оприходовать " И макрос сработал. А вот вот в последнюю или иную . Наверно все таки последняя должна быть. А на весь столбец не сработает макрос? Вы уж извините я только учусь.
 
 
 
#17
10.06.2013 22:03:22
А не поменять ли схему хранения данных?
Храним данные в виде таблицы с полями (Товар,Операция,Сумма по операции)
Работаем так: Выбираем товар-Выбираем операцию-Ставим сумму
Следующая строка... повторяем... Закончили ввод.
Нажимаем на кнопку - получаем сводную в разрезе товаров и операций.
 
 
 
#18
10.06.2013 23:04:33
См. файл. Формулы в столбце О не нужны. Копируется всегда последняя строка.
 
 
 
#19
11.06.2013 14:22:21
Юрий М. , спасибо большое. То что надо, то что и хотел.
 
 
 
#20
11.06.2013 21:59:37
Только не вижу смысла копировать в соседнюю таблицу - наверное, на другой лист нужно?
 
 
 
#21
12.06.2013 12:18:26
Совершенно верно надо было бы на соседний ( другой) лист.
 
 
 
#22
12.06.2013 13:41:39
Сами справитесь?
 
 
 
#23
13.06.2013 11:02:06
Сначала надо почитать. Если не справлюсь напишу.
 
 
 
#24
13.06.2013 19:04:06
Юрий М., если не трудно подскажите, что то у меня ни, как не получается.
 
 
 
#25
13.06.2013 19:33:28
Пока занят - немного позже... Или кто-нибудь другой заглянет и подскажет ))
 
 
 
#26
13.06.2013 21:44:05
См. файл.
 
 
 
#27
14.06.2013 13:15:48
Юрий М. Спасибо. То что надо. Если не трудно поясните почему столбца обозначаются цифрами, а не буквами (A,B,C,D...)? Или это все равно?
 
 
 
#28
14.06.2013 13:55:26
Всё зависит от ситуации )
 
 
 
#29
14.06.2013 20:04:48
Спасибо, за помощь. :)
 
 
 
Страницы: 1
Читают тему
Наверх