Как создать раскрывающийся список с несколькими флажками в Excel?

Многие пользователи Excel, как правило, создают раскрывающийся список с несколькими флажками, чтобы выбирать несколько элементов из списка за раз. На самом деле вы не можете создать список с несколькими флажками с проверкой данных. В этом руководстве мы покажем вам два метода создания раскрывающегося списка с несколькими флажками в Excel.

Используйте поле списка для создания раскрывающегося списка с несколькими флажками
A: Создайте список с исходными данными
B: Назовите ячейку, в которой вы будете размещать выбранные элементы
C: вставить форму, чтобы помочь вывести выбранные элементы
Легко создавайте раскрывающийся список с флажками с помощью замечательного инструмента
Дополнительные руководства для раскрывающегося списка ...

Используйте поле списка для создания раскрывающегося списка с несколькими флажками

Как показано на скриншоте ниже, на текущем листе все имена в диапазоне A2: A11 будут исходными данными для списка. При нажатии на кнопку в ячейке C4 можно вывести выбранные элементы, и все выбранные элементы в списке будут отображаться в ячейке E4. Для этого сделайте следующее.

A. Создайте список с исходными данными

1. Нажмите Застройщик > Вставить > Список (Active X Control). Смотрите скриншот:

2. Нарисуйте список на текущем листе, щелкните его правой кнопкой мыши и выберите Объекты из контекстного меню.

3. в Объекты диалоговое окно необходимо настроить следующим образом.

• 3.1 В СписокЗаполнитьДиапазон введите диапазон источников, который будет отображаться в списке (здесь я ввожу диапазон A2: A11);
• 3.2 В Стиль списка выберите 1 - вариант стиля fmList;
• 3.3 В Выбор из нескольких вариантов выберите 1 - fmMultiSelectMulti;
• 3.4 Закройте Объекты диалоговое окно. Смотрите скриншот:

B: Назовите ячейку, в которой вы будете размещать выбранные элементы

Если вам нужно вывести все выбранные элементы в указанную ячейку, например E4, сделайте следующее.

1. Выберите ячейку E4, введите ЛистбоксВывод в Имя Box и нажмите Enter .

C. Вставьте форму, чтобы помочь вывести выбранные элементы

1. Нажмите Вставить > Формы > Прямоугольник. Смотрите скриншот:

2. Нарисуйте прямоугольник на листе (здесь я рисую прямоугольник в ячейке C4). Затем щелкните прямоугольник правой кнопкой мыши и выберите Назначить макрос из контекстного меню.

3. в Назначить макрос диалогового окна, нажмите Новое .

4. В дебюте Microsoft Visual Basic для приложений окна, замените исходный код в Модули окно с приведенным ниже кодом VBA.

Код VBA: создать список с несколькими флажками

Sub Rectangle1_Click()
'Updated by Extendoffice 20200730
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
    xStr = ""
    xStr = Range("ListBoxOutput").Value
    
    If xStr <> "" Then
         xArr = Split(xStr, ";")
    For I = xLstBox.ListCount - 1 To 0 Step -1
        xV = xLstBox.List(I)
        For J = 0 To UBound(xArr)
            If xArr(J) = xV Then
              xLstBox.Selected(I) = True
              Exit For
            End If
        Next
    Next I
    End If
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
    For I = xLstBox.ListCount - 1 To 0 Step -1
        If xLstBox.Selected(I) = True Then
        xSelLst = xLstBox.List(I) & ";" & xSelLst
        End If
    Next I
    If xSelLst <> "" Then
        Range("ListBoxOutput") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("ListBoxOutput") = ""
    End If
End If
End Sub

Примечание: В коде Прямоугольник1 имя формы; СписокBox1 это имя списка; Выберите параметры и Варианты получения отображаемые тексты фигуры; и ЛистбоксВывод - имя диапазона выходной ячейки. Вы можете изменить их в зависимости от ваших потребностей.

5. Нажмите другой + Q клавиши одновременно, чтобы закрыть Microsoft Visual Basic для приложений окно.

6. Нажмите кнопку прямоугольника, чтобы свернуть или развернуть список. Когда поле списка расширяется, отметьте элементы в поле списка, а затем снова щелкните прямоугольник, чтобы вывести все выбранные элементы в ячейку E4. См. Демонстрацию ниже:

7. Затем сохраните книгу как Книга Excel MacroEnable для повторного использования кода в будущем.

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

Помимо приведенной выше демонстрации, мы также предоставляем пошаговое руководство, чтобы продемонстрировать, как применить эту функцию для решения этой задачи. Пожалуйста, сделайте следующее.

1. Откройте лист, в котором установлен раскрывающийся список проверки данных, щелкните Кутулс > Раскрывающийся список > Раскрывающийся список с флажками > Настройки. Смотрите скриншот:

2. в Раскрывающийся список с флажками Настройки диалоговое окно, настройте следующим образом.

• 2.1). Обращаться к в разделе укажите область применения, в которой вы будете создавать флажки для элементов в раскрывающемся списке. Вы можете указать определенный диапазон, текущий рабочий лист, текущая рабочая тетрадь or все открытые книги в зависимости от потребностей.
• 2.2). режим раздел выберите стиль, в котором вы хотите выводить выбранные элементы;
• Вот берет Изменить в качестве примера, если вы выберете этот вариант, значение ячейки будет изменено в зависимости от выбранных элементов.
• 2.3). Разделитель поле введите разделитель, который вы будете использовать для разделения нескольких элементов;
• 2.4). Направление текста раздел выберите направление текста в зависимости от ваших потребностей;
• 2.5) Нажмите OK .

3. Последний шаг, нажмите Кутулс > Раскрывающийся список > Раскрывающийся список с флажками > Включить раскрывающийся список флажков чтобы активировать эту функцию.

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

Для получения дополнительных сведений об этой функции, пожалуйста, посетите здесь.

Статьи по теме: