Fonction ISNUMERIC VBA

Aujourd'hui, nous allons explorer la fonction IsNumeric en VBA.

La fonction IsNumeric est utilisée pour déterminer si une expression donnée peut être évaluée comme un nombre.

Cette fonction est très utile pour valider les entrées utilisateur et garantir que les données manipulées sont bien des nombres.

La syntaxe de la fonction IsNumeric est simple :

IsNumeric(expression)

La fonction IsNumeric renvoie un Boolean :

• True si l'expression peut être évaluée comme un nombre.
• False si l'expression ne peut pas être évaluée comme un nombre.

Exemple ISNUMERIC 1 : Vérifier si une chaîne est numérique

Dans cet exemple, nous allons vérifier si une chaîne de caractères peut être interprétée comme un nombre.

Sub VerifierChaineNumerique()
    Dim valeur As String
    valeur = "12345"
    
    ' Vérifie si "valeur" est numérique
    If IsNumeric(valeur) Then
        MsgBox valeur & " est un nombre."
    Else
        MsgBox valeur & " n'est pas un nombre."
    End If
End Sub

Explication : La fonction IsNumeric vérifie si la chaîne "12345" peut être considérée comme un nombre. Puisque c'est le cas, la boîte de message affiche "12345 est un nombre."

Exemple ISNUMERIC 2 : Vérifier une valeur dans une cellule

Nous allons vérifier si la valeur entrée dans une cellule Excel est un nombre.

Sub VerifierCelluleNumerique()
    Dim valeur As Variant
    valeur = Range("A1").Value
    
    ' Vérifie si la valeur de la cellule A1 est numérique
    If IsNumeric(valeur) Then
        MsgBox "La cellule A1 contient un nombre."
    Else
        MsgBox "La cellule A1 ne contient pas un nombre."
    End If
End Sub

Explication : Ici, nous récupérons la valeur de la cellule A1 et utilisons IsNumeric pour déterminer si c'est un nombre. Le résultat est affiché dans une boîte de message.

Exemple ISNUMERIC 3 : Valider une entrée utilisateur

Ce code montre comment utiliser IsNumeric pour valider une entrée utilisateur dans une boîte de dialogue InputBox.

Sub ValiderEntreeUtilisateur()
    Dim entree As String
    entree = InputBox("Veuillez entrer un nombre:")
    
    ' Vérifie si l'entrée utilisateur est numérique
    If IsNumeric(entree) Then
        MsgBox "Vous avez entré un nombre valide : " & entree
    Else
        MsgBox "L'entrée n'est pas un nombre valide."
    End If
End Sub

Explication : Nous demandons à l'utilisateur d'entrer une valeur dans une boîte de dialogue. IsNumeric vérifie si l'entrée est un nombre et affiche un message approprié en conséquence.

Exemple 4 : Traitement de valeurs mixtes

Ici, nous allons traiter une liste de valeurs mixtes (textes et nombres) et filtrer uniquement les valeurs numériques.

Sub FiltrerValeursNumeriques()
    Dim valeurs As Variant
    Dim i As Integer
    valeurs = Array("123", "abc", "45.67", "xyz", "100")
    
    ' Parcours de chaque valeur et vérification si elle est numérique
    For i = LBound(valeurs) To UBound(valeurs)
        If IsNumeric(valeurs(i)) Then
            Debug.Print valeurs(i) & " est un nombre."
        Else
            Debug.Print valeurs(i) & " n'est pas un nombre."
        End If
    Next i
End Sub

Explication : Ce code parcourt un tableau de valeurs mixtes et utilise IsNumeric pour identifier et imprimer dans la fenêtre de débogage lesquelles sont des nombres et lesquelles ne le sont pas.

Pratique	Description
Valider les entrées utilisateur	Utilisez IsNumeric pour vérifier que les données saisies par les utilisateurs sont des nombres valides.
Vérifier les données avant traitement	Avant de réaliser des opérations mathématiques, vérifiez que les données sont numériques pour éviter les erreurs.
Combiner avec d'autres fonctions de validation	Combinez IsNumeric avec d'autres fonctions de validation comme IsDate pour des vérifications complètes.
Utiliser dans des boucles pour traiter des collections de données	Parcourez des collections ou des tableaux pour filtrer ou traiter uniquement les valeurs numériques.
Documentation claire et descriptive	Commentez votre code pour expliquer pourquoi et comment vous utilisez IsNumeric pour améliorer la maintenabilité.

rreur	Description
Oublier de valider les entrées	Ne pas vérifier si les entrées sont numériques peut entraîner des erreurs d'exécution lors des calculs.
Confondre les chaînes de chiffres avec des nombres	IsNumeric considère les chaînes de chiffres comme des nombres, mais elles doivent être converties avant les calculs.
Ne pas gérer les valeurs nulles ou vides	Les valeurs nulles ou vides peuvent produire des résultats inattendus avec IsNumeric, assurez-vous de les vérifier.
Utiliser IsNumeric pour des valeurs non numériques attendues	N'utilisez pas IsNumeric lorsque vous attendez des dates ou d'autres types de données spécifiques.
Ne pas combiner avec des contrôles de type appropriés	Ne reposez pas uniquement sur IsNumeric sans vérifier également les types de données attendus.

La fonction IsNumeric est un outil essentiel en VBA pour valider et gérer les données numériques. En suivant les bonnes pratiques et en évitant les erreurs courantes, vous pouvez améliorer la robustesse et la fiabilité de vos scripts VBA.

Vous souhaitez réellement progresser sur VBA et automatiser vos fichiers Excel ? Notre formation complète vous accompagne avec un formateur expert dédié, des exercices personnalisés et un programme adapté à votre niveau.

Vous bénéficiez de :

• Séances individuelles avec un formateur VBA expert
• Exercices sur mesure selon vos fichiers et votre métier
• Progression structurée du débutant à avancé
• Accompagnement humain tout au long du parcours
• Certification TOSA VBA possible en fin de formation
• Financement CPF, OPCO ou entreprise selon votre situation

Plus de 850 apprenants ont déjà été formés avec une satisfaction moyenne de 9,7/10.