¿ Ser capaz de validar la cantidad de los datos introducidos por el usuario pueden ayudar a mantener el control de sus datos en un libro de Excel. En Excel se puede utilizar Visual Basic para aplicaciones , también conocido como VBA , para comprobar la cantidad de caracteres introducidos en una célula particular. En VBA puede utilizar el evento " SelectionChange " para comprobar si el usuario mueve de una célula a otra. Dentro del procedimiento de " SelectionChange " puede utilizar la propiedad de las células " Character" para obtener el número de caracteres en la celda. Instrucciones
1
lanzamiento de Microsoft Office Excel 2007 y haga clic en la pestaña " Developer " . Haga clic en el icono de "Visual Basic " en el panel "Código " para abrir el Editor de Visual Basic . . " Sheet1" doble -click "Sheet1 " en el panel " Explorador de proyectos " para abrir el módulo de código para
2
Crear un nuevo " SelectionChange " sub procedimiento escribiendo el siguiente código VBA: < br >
Worksheet_SelectionChange Sub Private (Target ByVal como gama )
3
Crear una variable de cadena que se utiliza para obtener el texto introducido por el usuario :
userString Dim As String
4
iniciar un " if" y comprobar si los caracteres introducidos en "A1 " exceder los 10 caracteres. Escriba el siguiente código:
Si Cells ( 1 , 1 ) Characters.Count > 10 Entonces
5
Muestra un cuadro de mensaje si los personajes superan el límite de 10 caracteres. :
MsgBox "A1 tiene un límite de 10 caracteres "
6
Obtenga el valor introducido por el usuario y lo trunca a 10 caracteres , escriba el siguiente código:
< p > UserString = Cells ( 1 , 1 ) . Valor
userString = Izquierda ( userString , 10 )
7
Guardar la cadena truncada de nuevo en "A1 " y acabar con el " Si " declaración: .
Cells ( 1 , 1 ) Valor = userString
End If
8
final del procedimiento , escriba lo siguiente :
End Sub