Bonjour,

je me permets de poster ce sujet car je me trouve face à un problème

J'ai construit un tableau "virtuel", uniquement avec du code VBA.

ce tableau contient une ligne faite de "oui" et de "non".

La ligne se présente de la sorte:

oui oui oui oui non non non non

je voudrait un code qui, pour la colonne j, me donne la longueur de la dernière plage de "oui".

Pour être plus clair, cette boucle doit me donner:
3 pour j=3
0 pour j = 5

j'ai tenté le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
sub creationtableau()
 
dim tableau(1,1 to 8) as variant
 
tableau(1,1)="oui"
tableau(1,2)="oui"
tableau(1,3)="oui"
tableau(1,4)="oui"
tableau(1,5)="non"
tableau(1,6)="non"
tableau(1,7)="non"
tableau(1,8)="non"
 
end sub
 
 
sub test
 
for j=1 to 8
 
duree=0
While tableau(1, j -duree - 1) = "oui"
duree= duree+ 1
Wend
 
next j
 
end sub
Le problème c'est qu'il y a dépassement d'indice au bon d'un moment. J'ai essayer d'ajouter des conditions , mais rien n'y fait...

Pouvez-vous m'aider?

Merci d'avance.

TRM