Cómo Limiit el número de caracteres de texto en una celda de Excel 2007

¿ 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:

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