你在validateEdit写代码验证即可
If e.Col.Name = "第一列"
If e.Col.ComboList.Contains(e.text) = False Then
msgbox("不正确的数据")
e.cancel = true
End If