Discussion :

[guismoman33]

Merci à ouskel'n'or pour ces réponse efficace.
Sa me soul car j'ai beaucoup de soucis avec mon code...J'ai deux questions, comment faire une boucle qui va de 2 par 2???
Et regardez

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
For j = 9 To NbLigne
       If Workbooks(1).Sheets(13).Cells(j, 3).Value = ActiveSheet.Name And numero = Workbooks(1).Sheets(13).Cells(j, 4).Value Then
 
    Workbooks(1).Sheets(13).Cells(j, 2).Value = total
    Workbooks(1).Sheets(13).Cells(1, 1).Value = "oui"
       Else
    Workbooks(1).Sheets(13).Cells(p, 1).Value = Phase & d
    Workbooks(1).Sheets(13).Cells(p, 2).Value = total
    Workbooks(1).Sheets(13).Cells(p, 3).Value = ActiveSheet.Name
    Workbooks(1).Sheets(13).Cells(p, 4).Value = numero
    Workbooks(1).Sheets(13).Cells(1, 1).Value = "non"
       End If
Next j

Il m'écrit toujours non dans la case 1,1.
C'est bizarre car je clique deux fois sur le meme bouton il m'écrit non toujours comprend pus rien moi snifffff

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NbLigne = Worksheet(13).UsedRange.Rows.Count

Sa doit venir de sa le petit problème...

[tonton fred]

Bonjour,

comment faire une boucle qui va de 2 par 2???

Comme l'explique l'aide de VBA:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

For i = 1 to 10 step 2

Pour ton soucis, essaye l'execution pas a pas (F8) pour voir ce que fait vraiment ton code, tu verras si c'est un probleme de condition, de boucle...

[guismoman33]

C'est ce que j'ai sa me met rien du tout car c'est des chaine de lettre ce qui fait qu'il ne me le marque pas sa me soulllllllllll

je crois avoir compris.C'est une histoire de placement de ma boucle, car lorsque la condition est bonne au lieu de me changer une ligne il me change toute les ligne. Ce qu'il faut faire c'est arreter la boucle lorsque la condition est bonne

Mais ou la mettre rrrrrrrrrr

[tonton fred]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If ConditionBonne then Exit For

[alsimbad]

Il m'écrit toujours non dans la case 1,1.
C'est bizarre car je clique deux fois sur le meme bouton il m'écrit non toujours comprend pus rien moi snifffff

For j = 9 To NbLigne

pour j = 9, si il trouve la condition vrai, dans la case 1.1, il écrira oui, mais si a j = 10, il la trouve fausse, il écrira non, dans la meme case. donc le fait que tu ai toujour non viens juste du fait que la derniere boucle (pour j = nbligne)est fausse. essaye dans deux cases differentes tu verras. mais même, dans chacune des deux cases, tu n'auras que la valeur correspondant a la derniere des boucles correspondant a la condition