VBA : Comment utiliser IsText pour vérifier si la cellule est du texte
Vous pouvez utiliser la méthode IsText dans VBA pour vérifier si une cellule donnée contient du texte.
Cette fonction renverra True si la valeur d’une cellule donnée est reconnue comme du texte.
Sinon, la fonction retournera False .
Voici une manière courante d’utiliser cette fonction dans la pratique :
Sub CheckText()
Dim i As Integer
For i = 1 To 9
If IsText(Range("A" & i)) = True Then
Range("B" & i) = "Cell is Text"
Else
Range("B" & i) = "Cell is Not Text"
End If
Next i
End Sub
Cette macro particulière vérifiera si chaque cellule de la plage A1: A9 est du texte.
Si une cellule est du texte, alors « Cell is Text » sera renvoyé dans la cellule correspondante dans la plage B1:B9 .
Si une cellule n’est pas du texte, alors « La cellule n’est pas du texte » sera renvoyé à la place.
L’exemple suivant montre comment utiliser cette syntaxe dans la pratique.
Exemple : Comment utiliser IsText dans VBA
Supposons que nous ayons la colonne de valeurs suivante dans Excel :
Supposons que nous souhaitions vérifier si chaque cellule de la colonne A est du texte.
Nous pouvons créer la macro suivante pour ce faire :
Sub CheckText()
Dim i As Integer
For i = 1 To 9
If IsText(Range("A" & i)) = True Then
Range("B" & i) = "Cell is Text"
Else
Range("B" & i) = "Cell is Not Text"
End If
Next i
End Sub
Lorsque nous exécutons cette macro, nous recevons le résultat suivant :
La colonne B affiche une sortie qui nous indique si chaque cellule correspondante de la colonne A est reconnue ou non comme du texte.
Notez que les cellules contenant à la fois du texte et des chiffres sont reconnues comme du texte.
Pour qu’une cellule soit reconnue comme un nombre, elle doit contenir uniquement des nombres.
Remarque : Vous pouvez trouver la documentation complète de la fonction VBA IsText ici .
Ressources additionnelles
Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :
Comment convertir une chaîne en entier dans VBA
Comment convertir une chaîne en double dans VBA
Comment vérifier si une chaîne contient une autre chaîne dans VBA