Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Удаление ячейки из рабочего диапазона
 
Добрый день!)

Моя задача. Создать таблицу 10 на 10 (условно), где каждая ячейка взаимосвязана с соседними. ( по итогу будет лабиринт )

Начал думать над реализацией:

При работе макроса cоздается объект равный диапазону:

Set example = Range("A1:C4")



В дальнейшем при работе макроса планируется каждую ячейку пройтись при помощи оператора For Each.

но за одно прохождение заполниться лишь часть ячеек. ( при первом прохождение 4 ячейки заполниться, при втором от 4 до 12 и тд)

хочется облегчить жизнь программе и не удалить из example лишние ячейки.

Вот суть вопроса, как удалить из ранее созданного объекта Set example = Range("A1:C4"), уже не нужные ячейки?

или можно как то по другому это обыграть?
При создании кнопки привязать к ней макрос
 
Добрый день!)

Есть макрос, что создает кнопку. Так же есть макрос, что выводит сообщение.
Помогите мне сделать так, что когда кнопка создавалась, к ней был привязан макрос (программно сразу), что выводит сообщение.

Файл с макросами во вложении.  
Передача значения кнопок UserForm в оператор цикла
 
Добрый день!

Делаю "Игру" на VBA. Первоначально планировал делать при помощи InputBox.
Пример кода:
Код
Sub Основной()

A = InputBox("что сделать хочешь?")


Do While A <> 0


Select Case A
    Case 1
        MsgBox "Меню 1"
    Case 2
        MsgBox "Меню 2"
    Case 3
        MsgBox "Меню 3"
End Select

A = InputBox("что сделать хочешь?")

Loop

End Sub
Позже решил сделать через форму UserForm. Сделал следующую форму:(пример в загруженных файлах)

Суть вопроса: Подскажите, как можно реализовать нажатие кнопок в UserForm, чтобы они отрабатывали как A = InputBox("что сделать хочешь?")

Возможность сделать 1 кнопка = 1 выбор на всегда отсутствует, тк в будущем смысл кнопок будет меняться при работе. А вся логика работает на цикле While
Изменено: Владислав Сафонов - 01.12.2021 08:58:48
Страницы: 1
Наверх