Il est fréquent de récupérer des données mitigées de l'utilisateur tels que des lettres et des chiffres dans une variable. Un programmeur aurait alors besoin d'extraire les numéros de cette variable et les utiliser au besoin. Dans Visual Basic pour Applications ( VBA) , vous pouvez utiliser la fonction " IsNumberic " pour vérifier si une expression peut être évaluée comme un nombre . Si l'expression contient des numéros seulement , la fonction retourne "true". Mais si elle contient des lettres et des chiffres, l'expression sera de retour «faux». Instructions
1

créer un nouveau sous procédure de vérification d'un numéro dans une chaîne en tapant le code suivant :

checkForNumber Private Sub () de
2 < p > déclarer deux variables , l'une pour contenir la chaîne de chiffres et de lettres et l'autre pour les personnages simples, comme dans ce qui suit:

strvar Dim As String

oneChar Dim As String

strvar = " 12 sdf 3456 "
3

Ajoutez le code suivant pour parcourir tous les caractères de la chaîne. Vérifiez les numéros et les afficher dans la fenêtre Exécution :

Do While strvar <> ""

oneChar = Gauche ( strvar , 1)

strvar = Droite ( strvar , Len ( strvar ) - 1 )

Si IsNumeric ( oneChar ) Puis

Debug.Print ( oneChar )

End If

boucle < br > Hôtels 4

terminer la procédure en ajoutant "End Sub " et appuyez sur "Ctrl" et "G" pour afficher la fenêtre immédiate. Appuyez sur la touche "F5 " pour exécuter le code.