Прескочи на основното съдържание

Как да изберете всички квадратчета за отметка с помощта на едно квадратче за отметка в Excel?

Автор: Xiaoyang Последна промяна: 2020-07-03

Квадратчетата за отметка са много полезни за нашите потребители на Excel, със списък от квадратчета за отметка можем да изберем някои опции в работен лист. Ако има много квадратчета за отметка, които трябва да бъдат маркирани наведнъж, избирането им едно по едно ще бъде досадно и отнема много време. Тук мога да ви представя да изберете всички квадратчета за отметка, като използвате едно квадратче за отметка, тоест, когато поставите отметка в това главно квадратче за отметка, всички квадратчета за отметка на текущия работен лист ще бъдат избрани веднага.

Изберете всички квадратчета за отметка, като използвате едно квадратче с VBA код


стрелка син десен балон Изберете всички квадратчета за отметка, като използвате едно квадратче с VBA код

За да изберете всички квадратчета за отметка на работен лист, като използвате едно главно квадратче за отметка, моля, изпълнете следните стъпки:

1. Първо, можете да добавите квадратче за отметка и да го наименувате като Избери всички, това ще бъде вашето главно квадратче за отметка, вижте екранната снимка:

doc-select-all-checkboxes-1

2. След това задръжте натиснат ALT + F11 ключове и отваря Прозорец на Microsoft Visual Basic за приложения.

3. Щракнете Поставете > Модулии поставете следния код в Прозорец на модула.

VBA код: изберете всички квадратчета за отметка, като използвате едно квадратче за отметка

Sub SelectAll_Click()
'Update by Extendoffice
Dim xCheckBox As CheckBox
For Each xCheckBox In Application.ActiveSheet.CheckBoxes
    If xCheckBox.Name <> Application.ActiveSheet.CheckBoxes("Check Box 1").Name Then
        xCheckBox.Value = Application.ActiveSheet.CheckBoxes("Check Box 1").Value
    End If
Next
End Sub

4. След това запазете и затворете този код, върнете се в работния лист, щракнете с десния бутон върху Избери всички отметка и изберете Присвояване на макрос от контекстното меню вижте екранната снимка:

doc-select-all-checkboxes-2

5. В Присвояване на макрос кликнете върху Изберете Всички_Щракнете опция в Име на макрос списъчно поле и след това щракнете OK бутон, за да затворите този диалогов прозорец, вижте екранната снимка:

doc-select-all-checkboxes-3

6. И сега, когато поставите отметка в главното квадратче Избор на всички, всички други квадратчета за отметка на текущия работен лист са проверени наведнъж.

doc-select-all-checkboxes-4

Забележка: В горния код поле за отметка 1 е името на вашето основно поле за отметка, можете да го видите в Име Box като щракнете с десния бутон върху него и го променете според вашите нужди.

doc-select-all-checkboxes-5


Още по темата:

Как да свържа квадратчето за отметка към множество клетки в Excel?

Как бързо да вмъкнете няколко квадратчета за отметка в Excel?

Как бързо да изтриете няколко квадратчета за отметка в Excel?

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Is there a way to select specific checkboxes using a single checkbox?
This comment was minimized by the moderator on the site
Ниже код для установки определённых флажков с помощью одного основного флажка.

Sub Level1()
If Range("B23") = True Then Range("G29,G30,G39,G40,G41,G42,G43,I31,I32,I33,I34,I35,I36,I37,I38") = True
If Range("B23") = False Then Range("G29,G30,G39,G40,G41,G42,G43,I31,I32,I33,I34,I35,I36,I37,I38") = False
End Sub

, где
Level1 - имя макроса

B23 - номер ячейки в которой находится основной чек-бокс для флажка

G29,G30,G39,G40,G41,G42,G43,I31,I32,I33,I34,I35,I36,I37,I38 - диапазон ячеек, в которых содержатся чек-боксы для проставления флажков.

P.S. Не забывайте привязать чек-боксы к своим ячейкам и назначить макрос на основном чек-боксе.

Всем удачи!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations