Nombre de cases dans un tableau ????????Résolu

Question

j'ai 

Dim tableau() As String
Dim Paramètre As String

Paramètre = Command

je split paramétre sur un tiret pour obtenir les donnés passées en paramétre

tableau() = Split(Paramètre, "-")
donc mon tableau n'a que deux cases, je dois gérer l'erreur si y'a plus de deux tiret dans Paramètre donc je veux compter le nombre de cases de tableau et si plus de 2 alors je génére une erreur

comment compter le nombre de cases d'un tableau??

Merci d'avance!!

cs_rene38 · Accepted Answer

Bonjour
NombreDeCases = UBound(Tableau) + 1 (ça commence à 0)

Scalpweb · Answer

Ca ne commence pas toujours à zéro. Pour connaitre la base d'un tableau : LBound()

Scalpweb · Answer

Donc après, ça donne : 
taille = Ubount(tableau) - LBound(tableau)

voilà

cs_rene38 · Answer

Bonjour Scalpweb

Avec Dim tableau() As String, 
si on n'indique pas Option Base 1, ça commence à 0.

taille =  UBound(tableau) - LBound(tableau)  + 1 

Exemple : Dim t(5 To 7)  => t(5) , t(6) , t(7) 
soit 7 - 5 + 1 = 3 "cases"

Scalpweb · Answer

C'est vrai pour le plus 1, désolé j'étais distrait. Mais sinon, tu peux faire :

Dim tableau() as string

et après faire :

tableau(5 to 7)

comme tu l'as dit, donc ça peut ne pas commencer à zéro... C'est ce que je voulais dire. Mettre un LBound() permet d'éviter quelques erreurs idiotes il me semble.

;)

Nombre de cases dans un tableau ????????

5 réponses

Discussions similaires