Test si conersion possible VBA - VB/VBA/VBS - Programmation
MarshPosté le 08-02-2006 à 10:29:36
Salut, voila mon pb: Je fais une petite macro sous excel dans la je récupère le contenu d'une case contenant plusieurs mots séprarés par un espace. Je met ce contenu dans un tableau grace à la fonction split.
Jusqu'ici tout va bien.
La ou ca se gate c que je sais dans chaque il y a au moins un des mot qui est un chiffre mais je ne sais pas lequel et j'ai besoin de savoir ou il est.
Comment est-ce que je peux tester si le mot récupérer dans mon tableau est convertible en integer??
ex: Dim I As Integer caseText = "salut tot 123 tata" Tab = Split(caseText, " " ) i = 0 Do while CInt(Tab(i)) = 0 Then i=i+1... ====> Erreur a cette ligne car le premier mot "salut" n'est pas convertible en int...
Je croyais que CINT retournais 0 quand la conversion n'était pas possible???
Marsh Posté le 08-02-2006 à 10:29:36
Salut,
voila mon pb:
Je fais une petite macro sous excel dans la je récupère le contenu d'une case contenant plusieurs mots séprarés par un espace. Je met ce contenu dans un tableau grace à la fonction split.
Jusqu'ici tout va bien.
La ou ca se gate c que je sais dans chaque il y a au moins un des mot qui est un chiffre mais je ne sais pas lequel et j'ai besoin de savoir ou il est.
Comment est-ce que je peux tester si le mot récupérer dans mon tableau est convertible en integer??
ex:
Dim I As Integer
caseText = "salut tot 123 tata"
Tab = Split(caseText, " " )
i = 0
Do while CInt(Tab(i)) = 0 Then i=i+1... ====> Erreur a cette ligne car le premier mot "salut" n'est pas convertible en int...
Je croyais que CINT retournais 0 quand la conversion n'était pas possible???
Merci pour votre aide.