Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
VBA обработка событий элемента CommandButton, внедренного на лист Excel
 
#1
28.09.2020 16:23:15
Добрый день, коллеги.
Разбираюсь с VBA, возникли сложности. Подскажите, пожалуйста.
Решил немного усложнить задачу. Столкнулся с такой проблемой: не получается написать синтаксис для копирования строк на другой лист в таблицу. Что задумал: как все необходимые переключали и чекбоксы выбраны, данный набор добавляется на отдельный лист в конец таблицы с помощью кнопки Добавить. Вместо переключателей в итоговой таблице помещаются названия выбранных переключателей. Как опытные специалисты, подскажите, пожалуйста, как это реализовать. И есть проблема в кнопке Очистить.
 
 
 
#2
28.09.2020 19:37:35
У Вас сама идея плохая:)

В Вашем случае придется отдельный код писать к каждой кнопке "Добавить".
А чтобы найти последнюю строку таблицы (ее номер) - это нужно:
Код
Dim 
LastRow=Worksheets("Итог").Cells(rows.count, 3).End(xlUp).Row+1
Далее:
Код
Worksheets("Итог").Cells(LastRow, "C").EntireRow.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove 
Worksheets("Итог").Cells(LastRow+1, "C")=Cells(4,3) ' вставили наименование Вода в столбец "С", последнюю строку
Worksheets("Итог").Cells(LastRow+1, "D")=OptionBotton1.Caption ' вставили наименование в столбец "D", последнюю строку
и т.д.
Изменено: Михаил Лебедев - 28.09.2020 19:39:09
Всё сложное - не нужно. Всё нужное - просто /М. Т. Калашников/
 
 
 
#3
28.09.2020 19:52:34
Упростите себе задачу: вместо радиокнопок и ЧекБоксов используйте выпадающие списки, а на итоговый лист забирайте значения из ячеек.
 
 
 
#4
06.10.2020 16:46:13
Добрый день. Спасибо за обратную связь.
С кодом для копирования ячеек разобрался. Сложность в копировании выбранных переключателей и чекбоксов. Подскажите, пожалуйста.  
Изменено: Максим - 06.10.2020 16:46:40
 
 
 
Страницы: 1
Наверх