📌 Элементы управления в Excel: счетчик. Практический пример

Всем привет! 👋

Сегодня разберем интересный прием позволяющий применить один элемент управления к разным ячейкам.

Элементы управления в Excel: счетчик. Практический пример

📢 Файл с примером размещен в конце статьи 🔽

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

⚠ Но при стандартном использовании проблема заключается в том, что для каждого элемента управления вы создаете связь с ячейкой:

😎 А если таких элементов управления требуется несколько?

Создавать связь для каждого и дублировать несколько элементов управления - не лучшая практика!

🔔 Рассмотренное ниже решение позволит применить один элемент управления к нескольким значениям.

▶️ Диспетчер имен

Определение именованных диапазонов является важным шагом для получения корректных результатов

Для данного примера задаем 3 именованных диапазона:

🔘 ВыбраннаяСтрока

- определяет ссылку на ячейку А1 в которой будет выводится номер строки выбранного значения:

ссылка на ячейку A1

🔘 Диапазон

- определяет диапазон, для которого будет применен элемент управления:

ссылка на ячейки C3: C7

🔘 Ссылка

- данный диапазон потребуется, чтобы установить связь элемента управления с ячейкой:

его задаем формулой:

=СМЕЩ('пример решения'!$C$1;ВыбраннаяСтрока-1;0)

Функция СМЕЩ в Excel используется для получения ссылки на ячейку, смещенную относительно определенной ячейки на указанное количество строк и столбцов. Здесь 'пример решения'!$C$1 - ссылка на исходную ячейку C1 на листе "пример решения". Параметр ВыбраннаяСтрока представляет собой номер строки, относительно которой будет выполнено смещение. При вычитании 1 от ВыбраннаяСтрока, мы получаем смещение на 1 строку выше исходной ячейки C1. Ноль во втором аргументе функции означает отсутствие смещения по столбцам.

▶️ Макрос

Данный код представляет собой процедуру Worksheet_SelectionChange, которая выполняется автоматически при изменении выделенного диапазона на листе, что позволит применить один элемент управления к разным ячейкам

код позволяет отслеживать изменение выделенного диапазона на листе и записывать номер выбранной строки в ячейку "ВыбраннаяСтрока"

📝 Описание кода:

• Private Sub Worksheet_SelectionChange(ByVal Target As Range) - объявление процедуры, которая срабатывает при изменении выделенного диапазона на листе. Параметр Target представляет собой измененный диапазон.
• If Intersect(Target, Range("Диапазон")) Is Nothing Then - строка проверяет, находится ли измененный диапазон в указанном диапазоне "Диапазон". Если измененный диапазон не пересекается с "Диапазон", то выполнение процедуры прекращается.
• Range("ВыбраннаяСтрока").Value = 0: Если измененный диапазон не находится в "Диапазон", то значение ячейки "ВыбраннаяСтрока" устанавливается равным 0.
• Range("ВыбраннаяСтрока").Value = Target.Row: Если измененный диапазон находится в "Диапазон", то значение ячейки "ВыбраннаяСтрока" устанавливается равным номеру строки измененного диапазона.
• Application.CalculateFull - строка вызывает полное пересчет всех формул на листе.

Важно! код должен быть добавлен в модуль листа

▶️ Тестируем результат

Теперь, выделив нужную ячейку в столбце С (например, С6) мы можем изменять значения используя элемент управления:

Наша команда очень заинтересована в создании качественного и полезного контента. Поэтому, если Вам понравился этот урок, не забудьте поблагодарить автора лайком 👍. Если у Вас есть вопросы или своё решение, не стесняйтесь оставить комментарий 💬. Нужно решение для другой проблемы? Пожалуйста, напишите свой вопрос в комментариях 💬, и мы обязательно рассмотрим его в ближайшей теме обзора. Мы ценим Вашу обратную связь 💝, так как это помогает нам оценить, насколько данный материал был полезен для Вас

⏩ СКАЧАТЬ ПРИМЕР