Как получить комбобокс, чтобы не принимать пользовательский ввод в Excel-Vba?

Question

Кто-нибудь знает, какие свойства есть в выпадающем списке, которым я могу манипулировать, чтобы пользователь не мог вводить / вводить какие-либо данные?

Answer 1

Установите стиль комбинированного списка на 2 - fmStyleDropDownList. Это запретит ввод данных пользователем, а также предотвратит (combobox) .value изменения через макрос.

Answer 2

Вот способ изменить это для каждого объекта на листе:

Private Sub fixComboBoxes()
    Dim OLEobj As OLEObject
    Dim myWS As Worksheet
    Set myWS = Sheet1
    With myWS
        For Each OLEobj In myWS.OLEObjects
            If TypeOf OLEobj.Object Is MSForms.ComboBox Then

                OLEobj.Object.Style = fmStyleDropDownList
            End If
        Next OLEobj
    End With
End Sub

Answer 3

YourComboBoxName.Style = fmStyleDropDownList

или

YourComboBoxName.Style = 2

(это из справки MS Excel)