Numbers in combo box

J

johnrb7865

Hi, does anyone know a way to only allow the users to type numeric values in
a combo box and not alpha?

Thanks,
John
 
D

dan

Hi John,

I revised this from a post from Bob Kilmer on May 20 2003, 5:44 pm for
textboxes

Private Sub ComboBox1_KeyPress(ByVal KeyAscii As
MSForms.ReturnInteger)
KeyAscii = IIf(IsNumeric(Chr(KeyAscii)), IIf(KeyAscii > vbKey0,
KeyAscii, vbKeyBack), vbKeyBack)
End Sub

Dan
 
Top