Come Limiit il numero di caratteri di testo in una cella di Excel 2007?

April 18

Come Limiit il numero di caratteri di testo in una cella di Excel 2007?


Essere in grado di convalidare la quantità di dati inseriti da un utente può aiutare a mantenere il controllo dei propri dati in una cartella di lavoro di Excel. In Excel è possibile utilizzare Visual Basic, Applications Edition, noto anche come VBA, per controllare la quantità di caratteri inseriti in una determinata cella. In VBA è possibile utilizzare l'evento "SelectionChange" per verificare quando l'utente spostato da una cellula all'altra. All'interno della procedura di "SelectionChange" è possibile utilizzare le cellule "carattere" di proprietà per ottenere il numero di caratteri nella cella.

istruzione

1 Avviare Microsoft Office Excel 2007 e fare clic sulla scheda "Sviluppatore". Fare clic sull'icona "Visual Basic" dal riquadro "Codice" per aprire l'editor di Visual Basic. Fare doppio clic su "Sheet1" nel riquadro "progetti" per aprire il modulo di codice per "Sheet1".

2 Creare una nuova procedura secondaria "SelectionChange" digitando il seguente codice VBA:

Private Sub Worksheet_SelectionChange (obiettivo di ByVal come gamma)

3 Creare una variabile String utilizzato per ottenere il testo inserito dall'utente:

Dim userString As String

4 Avviare un "if" e verificare se i caratteri inseriti in "A1" superare i 10 caratteri. Digitare il seguente codice:

If Cells(1, 1).Characters.Count > 10 Then

5 Visualizzare una finestra di messaggio se i personaggi superano il limite di 10 caratteri:

MsgBox "A1 has a limit of 10 characters"

6 Ottenere il valore immesso dall'utente e tronca a 10 caratteri digitando il seguente codice:

userString = Cells(1, 1).Value

UserString = Sinistra (UserString, 10)

7 Salvare la stringa troncata nel "A1" e alla fine il "if":

Cells(1, 1).Value = userString

Finisci se

8 Terminare la procedura digitando la seguente:

End Sub