Come controllare per i numeri in VBA

August 7

Come controllare per i numeri in VBA


E 'comune per recuperare i dati contrastanti da parte dell'utente, come lettere e numeri in una variabile. Un programmatore avrebbe quindi bisogno di estrarre i numeri da quella variabile e usarli come necessario. In Visual Basic, Applications Edition (VBA), è possibile utilizzare la funzione "IsNumberic" per verificare se l'espressione può essere valutata come un numero. Se l'espressione contiene solo numeri, la funzione restituisce "vero". Ma se contiene lettere e numeri, l'espressione restituisce "false".

istruzione

1 Creare una nuova procedura secondaria per verificare la presenza di un numero in una stringa digitando il seguente codice:

Private Sub checkForNumber ()

2 Dichiarare due variabili, una per tenere la stringa con numeri e lettere e l'altra per singoli caratteri, come nell'esempio seguente:

Dim strVar As String

Dim oneChar As String

strVar = "12 sdf 3456"

3 Aggiungere il seguente codice per eseguire un ciclo attraverso ogni carattere della stringa. Controllare per i numeri e li visualizza attraverso la finestra immediata:

Do While strVar <> ""

oneChar = Left(strVar, 1)

strVar = Destra (strVar, Len (strVar) - 1)

Se IsNumeric (oneChar) Poi

Debug.Print (oneChar)

Finisci se

Ciclo continuo

4 Terminare la procedura con l'aggiunta di "End Sub" e premere il tasto "Ctrl" e "G" per visualizzare la finestra immediata. Premere il tasto "F5" per eseguire il codice.