Vérifier un tableau : VBA
Résolu
kanadianDri3
Messages postés
85
Date d'inscription
Statut
Membre
Dernière intervention
-
thev Messages postés 1986 Date d'inscription Statut Membre Dernière intervention -
thev Messages postés 1986 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Voilà je dois parcourir un tableau en VBA. Le but est de m'arreter au dernier indice qui soit pas null, empty ou je ne sais quoi. Le problème ce que je ne sais pas ce que contienne les indices de mon tableau quand je n'enregistre aucune valeur. (c'est un tableau d'entier)
Exemple : Dim tab(19) As Integer. Ca va de 0 à 19. Je peux utiliser tous les indices comme je peux m'arreter à n'importe lequel d'entre eux.
Le mieu c'est d'utiliser :
If ( tab(i) = 0 ) Then .....
ou
If ( IsEmpty ( tab (i) ) ) Then ....
ou autre chose encore mais là....??? inconnu ???
Merci pour votre aide
Voilà je dois parcourir un tableau en VBA. Le but est de m'arreter au dernier indice qui soit pas null, empty ou je ne sais quoi. Le problème ce que je ne sais pas ce que contienne les indices de mon tableau quand je n'enregistre aucune valeur. (c'est un tableau d'entier)
Exemple : Dim tab(19) As Integer. Ca va de 0 à 19. Je peux utiliser tous les indices comme je peux m'arreter à n'importe lequel d'entre eux.
Le mieu c'est d'utiliser :
If ( tab(i) = 0 ) Then .....
ou
If ( IsEmpty ( tab (i) ) ) Then ....
ou autre chose encore mais là....??? inconnu ???
Merci pour votre aide
A voir également:
- Vérifier un tableau : VBA
- Tableau word - Guide
- Trier un tableau excel - Guide
- Tableau ascii - Guide
- Imprimer un tableau excel - Guide
- Verifier compatibilite windows 11 - Guide
4 réponses
Je pense qu'il faut prendre le problème dans l'autre sens, c'est à dire au chargement du tableau via la gestion d'un tableau dynamique :
Dim tab() As Integer puis ajout pas à pas du nombre d'indices nécessaires avec ReDim tab(i)
Dim tab() As Integer puis ajout pas à pas du nombre d'indices nécessaires avec ReDim tab(i)
1- il ne faut pas oublier qu'avec l'option Preserve seule la dernière dimension est modifiable
2- ne pas utiliser le nom de variable tab car c'est un mot réservé.
2- ne pas utiliser le nom de variable tab car c'est un mot réservé.
Juste une derniere question (en espérant que tu reviendras voir)
Je vais illustrer par un exemple. Je ne sais pas si c'est possible :
Dim tab() As Integer
ReDim tab(1)
tab(1)=1
ReDim Preserve tab(2)
tab(2)=2
ReDim Preserve tab(2,2)
tab(1,2)=3
tab(2,2)=4
Pour les dernieres lignes c'est OK ? Est-ce autorisé ?
Merci :D
Je vais illustrer par un exemple. Je ne sais pas si c'est possible :
Dim tab() As Integer
ReDim tab(1)
tab(1)=1
ReDim Preserve tab(2)
tab(2)=2
ReDim Preserve tab(2,2)
tab(1,2)=3
tab(2,2)=4
Pour les dernieres lignes c'est OK ? Est-ce autorisé ?
Merci :D
