Validar
Hola nuevamente, quisiera saber como se puede validar un campo de texto en mi userform para que solo me ingrese números. Tengo este:
If IsNumeric(txtImp1.Text) Then
costoTotal = txtImp1.Value
txtCostoTotal.Value = costoTotal
Else: MsgBox ("")
End If
Pero a la hora que ingreso una letra me sale la alerta del msgbox pero igual me lo escribe en mi caja de texto
If IsNumeric(txtImp1.Text) Then
costoTotal = txtImp1.Value
txtCostoTotal.Value = costoTotal
Else: MsgBox ("")
End If
Pero a la hora que ingreso una letra me sale la alerta del msgbox pero igual me lo escribe en mi caja de texto
1 respuesta
Respuesta
1
Prueba con
If IsNumeric(txtImp1.Text) Then
txtCostoTotal.Value = txtImp1.Value 'No se para que haces la doble asignación aunque puedes dejarlo
Else
msgbox "el campo debe ser numérico", vbOkOnly, "Atención"
txtImp1.Text = ""
txtImp1.SetFocus
End If
If IsNumeric(txtImp1.Text) Then
txtCostoTotal.Value = txtImp1.Value 'No se para que haces la doble asignación aunque puedes dejarlo
Else
msgbox "el campo debe ser numérico", vbOkOnly, "Atención"
txtImp1.Text = ""
txtImp1.SetFocus
End If