повторите ваше сообщение здесь ещё раз и по возможности приложите небольшой файл-пример
Передача значения кнопок UserForm в оператор цикла
01.12.2021 08:50:51
|
|
|
|
01.12.2021 08:57:18
Добрый день!
Делаю "Игру" на VBA. Первоначально планировал делать при помощи InputBox. Пример кода:
Суть вопроса: Подскажите, как можно реализовать нажатие кнопок в UserForm, чтобы они отрабатывали как A = InputBox("что сделать хочешь?") Возможность сделать 1 кнопка = 1 выбор на всегда отсутствует, тк в будущем смысл кнопок будет меняться при работе. А вся логика работает на цикле While
Изменено: |
|||
|
|
01.12.2021 11:38:02
Ознакомьтесь с правилами форума. Предложите название темы. Заменят модераторы
|
|
|
|
01.12.2021 11:54:29
, за вас сделать юзерформу? или сами уже?
Не бойтесь совершенства. Вам его не достичь.
|
|
|
|
01.12.2021 12:33:59
Название в личке получено. Переименована
|
|
|
|
01.12.2021 12:38:49
, не сразу понял о чем вы) Модераторы подсказали...
Выкладываю фаил с UserFormой, при запуске макроса откроется сама форма. При ее закрытие запуститься цикл игры...вот его нужно реализовать как то в VBA без всплывающих окон =) |
|
|
|
01.12.2021 13:06:12
игра не Counter Strike даже
|
|
|
|
01.12.2021 13:06:15
Изменено: |
|||||
|
|
01.12.2021 13:20:08
, честно признаюсь, я не вижу разницы... это одно и тоже...
Я конечно чайник, но суть задачи сводится к тому чтобы impubox заменить на кнопки в форме UserForm....все выше сказанное лишь заход к проблеме с разных сторон....=( переименовывать не нужно более=) |
|
|
|
01.12.2021 13:57:31
Не бойтесь совершенства. Вам его не достичь.
|
|||
|
|
01.12.2021 14:04:51
Владислав Сафонов, Какие кнопки на форме должны заменить InputBox?
"Все гениальное просто, а все простое гениально!!!"
|
|
|
|
01.12.2021 14:10:37
Для примера мне будет двух достаточно) CommandButton CB1 CommandButton CB2 |
|
|
|
01.12.2021 14:31:43
Так?
"Все гениальное просто, а все простое гениально!!!"
|
|
|
|
01.12.2021 14:46:57
, , нет =(
окошко новое не должно высвечиваться...то есть то что мы в inputBox должны ввести(первый вариант) в идеале должно вводиться при нажатии кнопки, но цикл должен работать дальше... То есть ввод в inputBox значения 1, это должно быть кнопка 1, ввод в inputBox значения 2, это должно быть кнопка 2.... Сделал блок схемку(слево было) справа как хотел бы=) и нужен именно цикл. В будущем в каждой процедуре будут еще ветвления...
Изменено: |
|
|
|
01.12.2021 14:49:32
не совсем понятно это
Тема звучит - "Передача значения в оператор цикла", в процедуре Start не увидел цикла, но значение кнопки в нее передал, циклом ее сами обернете если нужно. Если разбираться в коде то вызываемая процедура "Основной", как по мне какой то бесконечный цикл, непонятно для чего написанный, выйти из которого можно только с ошибкой
Изменено:
"Все гениальное просто, а все простое гениально!!!"
|
|||
|
|
01.12.2021 15:01:33
из основного цикла выйти можно введя 0=)
Do While A <> 0 Select Case A Case 1 MsgBox "Побег" Case 2 MsgBox "бой" Case 3 MsgBox "торг" End Select я похоже суть донести не могу=(((( мне нужно избавиться от inputbox, и чтобы вместо него были кнопки userform...но чую я,это не возможно =( |
|
|
|
01.12.2021 15:04:12
Изменено:
"Все гениальное просто, а все простое гениально!!!"
|
|||||
|
|
01.12.2021 15:04:57
Нормально задачу описать!
ЗАБУДЬТЕ о формах, кнопках и циклах. Excel - да впервые слышите такое! Перед Вами - только Ваша задача. Настроились? А теперь формулируйте название темы. Опишите задачу |
|
|
|
01.12.2021 15:21:05
"Все гениальное просто, а все простое гениально!!!"
|
||||
|
|
|||