SI ALGUIEN CONOCE COMO LIMITAR UN INGRESO DE DATOS POR INPUTBOX QUE
CONTENGA SOLO UN DIGITO MAYOR QUE "0" Y MENOR QUE "9" PERO ESTA
LIMITACION SE DE EN LA VENTANA QUE DESPLEGA EL INPUTBOX, AUNQUE SE
PUEDA LIMITAR ESTO POR CODIGO COMO FORSE EN EL SIGUIENTE:
==
For Column = 0 To 13
Dato_alum = Val(InputBox("DIGITO N° " & 1 + Column & " DE
CODIGO", "CODIGO DEL ALUMNO"))
ActiveCell.Offset(0, Column).Value = Dato_alum
Do While ActiveCell.Offset(0, Column).Value >= 9
If ActiveCell.Offset(0, Column).Value >= 9 Then
MsgBox Prompt:="Debe de Ingresar CODIGO DE UN DIGITO ",
Title:="ERROR"
Dato_alum = Val(InputBox("DIGITO N° " & 1 + Column & " de
CODIGO", "CODIGO DEL ALUMNO"))
ActiveCell.Offset(0, Column).Value = Dato_alum
End If
Loop
Next Column
SI EXISTE OTRA MANERA DE LOGRAR ESTO HACIENDO QUE DIGITE SOLO UN DIGITO
EN INPUTBOX Y SE DETENGA EL CURSOR A PESAR DE QUE DIGITE MAS
NUMEROS???? PARA LUEGO LE DE "OK"
DE ANTE MANO AGRADESCO LA RESPUESTA
ATTE,
CARLOS
Leer las respuestas