在validateEdit那里写代码判断,如
If e.Col.Name = "第一列"
If e.Col.ComboList.Contains(e.text) = False Then
msgbox("不正确的数据")
e.cancel = true
End If