Boucle while

mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention   -  
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,


peut on avoir deux compteur sur une même boucle du style*
while i=2 and j=8

10 réponses

Utilisateur anonyme
 
Bonjour,

pour évaluer une condition ( resultat booleen ), il suffit de la mettre entre parentheses

Cordialement



0
Iama Messages postés 319 Date d'inscription   Statut Membre Dernière intervention   14
 
bonjour
A ma connaissance il faut faire une boucle dans une boucle.
cordialement
0
Utilisateur anonyme
 
C'est possible de la faire comme ça mais si la premiere condition n'est plus remplie la seconde elle peut l'etre. Il s'agit donc bien d'utiliser l'operateur AND dans un seul while.

Pour ce que tu proposes :

WHILE J=10

WHILE K=1
.....
WEND

WEND

Si J n'est plus egal à 10, mais que K = 1 tu ne sortiras pas de ta boucle
0
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention  
 
j'ai testé mais cela bloque la sortie d eboucle n'est pas top merci beaucoup je vais tester pour avoir une bonne sortie de boucle
0
Iama Messages postés 319 Date d'inscription   Statut Membre Dernière intervention   14
 
bonjour ludobabs

bien vu
0
Normad Messages postés 112 Date d'inscription   Statut Membre Dernière intervention   40
 
Bonjour,

Personnellement j'écrirais plutôt :

    Do While i + j = 10
' 2e contôle, si echec sortie de la boucle
If i <> 2 Then Exit Do
'suite du code...

Loop
0
Utilisateur anonyme
 
re

Dim i As Integer =2
Dim j As Integer = 10

While ( i = 2 and j = 10 )
 ...    
End While 


cdt
En informatique 99% des problèmes se situent entre le fauteuil et le clavier
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention  
 
bonjour
merci de ce code
je ne sias pas comment finir ce code près Loop je sais pas terminer
merci encore de m'iader
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Bonjour à tous

Comme ça n'a pas l'air d'être concluant, peux tu nous expliquer en "bon français" le contenu de ta boucle, quelque chose du genre

Tant que cettte condition est réalisée
je fais ça
puis ça
puis ça
fin tant que

Cdlmnt
0
quent
 
bonjour,
si tu met :
while i=1 and j=10
...
wend
tu sortira de la boucle quand :
soit i different de 1
soit j different de 10
si tu met :
while i=1 or j=10
...
wend
tu sortira de la boucle quand :
i different de 1
ET
j different de 10
a toi de voir selon ton besoins
0
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention  
 
Sub testeur()
Dim i As Integer, j As Integer, index As Integer

i = 2: j = 2

While i < 9
'ecrire sur une ligne
For j = 2 To 6
Cells(i, j).Value = InputBox("montant")
Next j
'incrementer d'une ligne
i = i + 1
j = 2
Wend

End Sub

voici ce que j'ai ecris cela fonctionne bien peut être que c'est pa sorthodoxe mais bon le résultat est là ce cegrace à vous merci beaucou^p
0
quent
 
bonjour,
si ca marche c'est quoi que tu veux faire et qui ne marche pas ?
et aussi pourquoi tu n'imbrique pas 2 boucles for ?

Sub testeur()
for i=2 to 8
For j = 2 To 6
Cells(i, j).Value = InputBox("montant")
Next j
next i
End Sub
0
mylord666 Messages postés 151 Date d'inscription   Statut Membre Dernière intervention  
 
merci beaucoup de votre aide bonne soiree
0