Интерактивный код

Интерактивный код, Изменение ячеек пользователем во время исполнения макроса

Пользователь

Сообщений: 83 Регистрация: 18.03.2013

10.04.2013 11:05:30

Здравствуйте!
Проблема есть такая!
Когда запускаю любой макрос, то автоматически блокируются ячейки excel, т.е. во время исполнения макроса не могу изменять ячейки, а мне очень нужно.
Может быть вы подскажете, как отключить блокировку.

LVL Пользователь Сообщений: 905 Регистрация: 01.01.1970	#2 10.04.2013 11:51:10 Ни как, а зачем Вам это вообще?

kalbasiatka Пользователь Сообщений: 685 Регистрация: 22.12.2012	#3 10.04.2013 12:09:02 Что за макрос такой, что за время его выполнения можно чайку попить?

usersuperpupsik

Пользователь

Сообщений: 83 Регистрация: 18.03.2013

10.04.2013 13:20:59

Цитата
Ни как, а зачем Вам это вообще?

Помню, как кажется EducatedFool сделал игру-змейку в Excel.
Так там вот и можно было во время работы макроса изменять ячейки или что-то в этом роде,
т.е. нажимая стрелки влево-вправо-вверх-вниз, менять значения параметров во время выполнения макроса.
Т.о. код был интерактивным.Так что думаю это возможно.

Цитата
Когда запускаю любой макрос, то автоматически блокируются ячейки excel, т.е. во время исполнения макроса не могу изменять ячейки, а мне очень нужно.Может быть вы подскажете, как отключить блокировку.

nerv

Пользователь

Сообщений: 3071 Регистрация: 22.12.2012

10.04.2013 14:19:00

Код
DoEvents

Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук

https://github.com/nervgh

EducatedFool

Пользователь

Сообщений: 3695 Регистрация: 23.12.2012

10.04.2013 14:32:18

Цитата
кажется EducatedFool сделал игру-змейку в Excel

действительно, кажется.
я такого не делал

По теме: предполагаю, что в коде используется модальная форма
Надо в её свойствах поставить ShowModal = FALSE, и открытая форма не будет мешать изменению ячеек.

Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

usersuperpupsik Пользователь Сообщений: 83 Регистрация: 18.03.2013	#7 10.04.2013 14:41:11 EducatedFool это разве не ваша работа? Вот Файл. Прикрепленные файлы Sample__28-01-2010__18-42-24.zip (21.38 КБ)

usersuperpupsik

Пользователь

Сообщений: 83 Регистрация: 18.03.2013

10.04.2013 15:06:34

Цитата
nerv пишет: DoEvents

Можно поточнее,nerv.

usersuperpupsik

Пользователь

Сообщений: 83 Регистрация: 18.03.2013

10.04.2013 22:38:15

Спасибо за идею, nerv!Всё понял!

Этим макросом изменяем значение ячейки b2:

Код
Public Sub poweron() 'DoEvents [a1] = 1 Do While [a1] = 1 [b2] = [b2] + 1 DoEvents Loop

А этим макросом останавливаем макрос poweron:

Код
Public Sub poweroff() [a1] = 0 End Sub

Таким образом можно остановить макрос с помощью виртуальной кнопки, а не стандартной материальной клавиатурной Esc-это очень удобно!

Изменено: usersuperpupsik - 10.04.2013 22:48:36

Читают тему