Boucle while
Fermé
mylord666
Messages postés
151
Date d'inscription
jeudi 26 juin 2014
Statut
Membre
Dernière intervention
9 septembre 2015
-
16 août 2014 à 17:31
mylord666 Messages postés 151 Date d'inscription jeudi 26 juin 2014 Statut Membre Dernière intervention 9 septembre 2015 - 17 août 2014 à 22:11
mylord666 Messages postés 151 Date d'inscription jeudi 26 juin 2014 Statut Membre Dernière intervention 9 septembre 2015 - 17 août 2014 à 22:11
A voir également:
- Boucle while
- Boucle cmd - Forum Programmation
- Freebox redémarre en boucle ✓ - Forum Freebox
- Le fichier contient un programme écrit en python. le programme construit un mot secret mais il ne l'affiche pas. modifiez ce programme afin que à chaque itération de la boucle : la variable a augmente de 2 la variable b diminue de 1 ajoutez une instruction pour faire afficher le mot secret construit. quel est ce mot secret ? ✓ - Forum Python
- Mon pc s'allume et s'éteint en boucle ✓ - Forum Matériel & Système
- Samsung a51 redémarre en boucle - Forum Mobile
10 réponses
Utilisateur anonyme
16 août 2014 à 17:35
16 août 2014 à 17:35
Bonjour,
pour évaluer une condition ( resultat booleen ), il suffit de la mettre entre parentheses
Cordialement
pour évaluer une condition ( resultat booleen ), il suffit de la mettre entre parentheses
Cordialement
Iama
Messages postés
319
Date d'inscription
mercredi 13 janvier 2010
Statut
Membre
Dernière intervention
27 mars 2020
14
16 août 2014 à 17:36
16 août 2014 à 17:36
bonjour
A ma connaissance il faut faire une boucle dans une boucle.
cordialement
A ma connaissance il faut faire une boucle dans une boucle.
cordialement
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
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
mylord666
Messages postés
151
Date d'inscription
jeudi 26 juin 2014
Statut
Membre
Dernière intervention
9 septembre 2015
16 août 2014 à 22:07
16 août 2014 à 22:07
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
Iama
Messages postés
319
Date d'inscription
mercredi 13 janvier 2010
Statut
Membre
Dernière intervention
27 mars 2020
14
17 août 2014 à 11:28
17 août 2014 à 11:28
bonjour ludobabs
bien vu
bien vu
Normad
Messages postés
112
Date d'inscription
dimanche 6 juin 2010
Statut
Membre
Dernière intervention
10 juin 2015
37
17 août 2014 à 09:07
17 août 2014 à 09:07
Bonjour,
Personnellement j'écrirais plutôt :
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
Utilisateur anonyme
Modifié par ludobabs le 17/08/2014 à 11:44
Modifié par ludobabs le 17/08/2014 à 11:44
re
cdt
En informatique 99% des problèmes se situent entre le fauteuil et le clavier
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
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
mylord666
Messages postés
151
Date d'inscription
jeudi 26 juin 2014
Statut
Membre
Dernière intervention
9 septembre 2015
17 août 2014 à 15:26
17 août 2014 à 15:26
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
merci de ce code
je ne sias pas comment finir ce code près Loop je sais pas terminer
merci encore de m'iader
ccm81
Messages postés
10853
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
24 avril 2024
2 404
Modifié par ccm81 le 17/08/2014 à 16:08
Modifié par ccm81 le 17/08/2014 à 16:08
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
Cdlmnt
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
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
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
mylord666
Messages postés
151
Date d'inscription
jeudi 26 juin 2014
Statut
Membre
Dernière intervention
9 septembre 2015
17 août 2014 à 17:20
17 août 2014 à 17:20
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
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
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
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
mylord666
Messages postés
151
Date d'inscription
jeudi 26 juin 2014
Statut
Membre
Dernière intervention
9 septembre 2015
17 août 2014 à 22:11
17 août 2014 à 22:11
merci beaucoup de votre aide bonne soiree