如何让组合框不接受Excel-Vba中的用户输入？

Question

有谁知道我可以操作的组合框中的属性是什么,以便不允许用户键入/输入任何数据？

Answer 1

将组合框的样式设置为2 - fmStyleDropDownList.这将禁止用户输入,并且还将通过宏阻止(组合框).value更改.

Answer 2

YourComboBoxName.Style = fmStyleDropDownList

要么

YourComboBoxName.Style = 2

（来自MS Excel帮助）

Answer 3

这是为工作表上的每个对象更改此方法的方法:

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