Как добавить флажки в раскрывающемся списке в Excel или Google Sheets?

Question

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

Возможно ли, чтобы раскрывающийся список ячеек имел флажки рядом с раскрывающимися элементами?

Answer 1

Вместо выпадающего списка в поле списка лучше всего добавить флажки для множественного выбора.

Позвольте мне объяснить, как это сделать в Excel (большинство команд и методов Excel также применимы к Google Sheet).

Как это устроено:

1. Нажмите вкладку « Разработчик», «Вставка», «Список» (из Active X Control).
2. После того, как вы нарисуете список, щелкните его правой кнопкой мыши.
3. Затем выберите Свойства из меню.
4. Найдите ListFillRange и вставьте диапазон данных источника (A155:A164).
5. Найдите поле ListStyle, выберите 1-fmList StyleOption.
6. Затем выберите 1 – fmMultiSelectMulti в MultiSelect.
7. Затем выберите любую указанную ячейку (E155), затем назовите ее как ListBoxOutput.
8. Затем нажмите « Вставить, формы» и нарисуйте соответствующую (C155) фигуру над списком.
9. Затем щелкните правой кнопкой мыши Shape и выберите Assign Macro (Rectangle2_Click) из меню.

Вставьте приведенный ниже код как модуль.

Sub Rectangle2_Click()

Dim xSelShp As Shape, xSelLst As Variant, I As Integer

Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1

If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Click After Pickup Options"
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Click To 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

10. Щелкните фигуру, чтобы открыть список, выберите элементы и снова щелкните фигуру, чтобы поместить выбранные элементы в ячейку E155 .

Обратите внимание, настройте ссылки на ячейки для списка элементов источника, поля списка, позиции формы и для ячейки вывода.