Block User From Editing The Combo Box Text Value

[PcMax]

Hi,

I had tried unsuccessfully with other controls

To Restrict the selection in the combobox, I added the following code:

Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
  If KeyCode = 40 Then
    With Me.ComboBox1
      If .ListIndex + 1 = .ListCount Then KeyCode = 0
    End With
  End If
End Sub

Here is the latest correct version