Do While ActiveCell.Value <> "fin"
ActiveSheet.Cells(ligne, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en
commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la
boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du
tout.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Ardus Petus
Do While ActiveCell.Value <> "fin" Cells(activecell.row, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du tout.
Merci d'avance.
Mickael
Do While ActiveCell.Value <> "fin"
Cells(activecell.row, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
"Mickael LUNVEN" <micklunven__ntspm@yahoo.fr> a écrit dans le message de
news: eEurSYZhGHA.4044@TK2MSFTNGP03.phx.gbl...
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin"
ActiveSheet.Cells(ligne, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en
commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la
boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
du
tout.
Do While ActiveCell.Value <> "fin" Cells(activecell.row, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du tout.
Merci d'avance.
Mickael
Mickael LUNVEN
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la cellule en cours. De plus ton code me donne le même effet (la boucle s'arrête des la première ligne)
"Ardus Petus" a écrit dans le message de news:u7BA%
Do While ActiveCell.Value <> "fin" Cells(activecell.row, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
du tout.
Merci d'avance.
Mickael
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la
cellule en cours.
De plus ton code me donne le même effet (la boucle s'arrête des la première
ligne)
"Ardus Petus" <ardus.petus@laposte.net> a écrit dans le message de
news:u7BA%23bZhGHA.4864@TK2MSFTNGP03.phx.gbl...
Do While ActiveCell.Value <> "fin"
Cells(activecell.row, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
"Mickael LUNVEN" <micklunven__ntspm@yahoo.fr> a écrit dans le message de
news: eEurSYZhGHA.4044@TK2MSFTNGP03.phx.gbl...
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin"
ActiveSheet.Cells(ligne, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
Cette boucle reste bloqué sur la première cellule alors que quand je
mets
en
commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la
boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige
pas
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la cellule en cours. De plus ton code me donne le même effet (la boucle s'arrête des la première ligne)
"Ardus Petus" a écrit dans le message de news:u7BA%
Do While ActiveCell.Value <> "fin" Cells(activecell.row, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
du tout.
Merci d'avance.
Mickael
ABED HADDOU
Bonjour ligne Do While Cells(ligne,10) <> "fin" Cells(ligne, 10).Value = unedate ligne=ligne+1 Loop
Abed_H
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la cellule en cours. De plus ton code me donne le même effet (la boucle s'arrête des la première ligne)
"Ardus Petus" a écrit dans le message de news:u7BA%
Do While ActiveCell.Value <> "fin" Cells(activecell.row, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
du tout.
Merci d'avance.
Mickael
Bonjour
ligne
Do While Cells(ligne,10) <> "fin"
Cells(ligne, 10).Value = unedate
ligne=ligne+1
Loop
Abed_H
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la
cellule en cours.
De plus ton code me donne le même effet (la boucle s'arrête des la première
ligne)
"Ardus Petus" <ardus.petus@laposte.net> a écrit dans le message de
news:u7BA%23bZhGHA.4864@TK2MSFTNGP03.phx.gbl...
Do While ActiveCell.Value <> "fin"
Cells(activecell.row, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
"Mickael LUNVEN" <micklunven__ntspm@yahoo.fr> a écrit dans le message de
news: eEurSYZhGHA.4044@TK2MSFTNGP03.phx.gbl...
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin"
ActiveSheet.Cells(ligne, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
Cette boucle reste bloqué sur la première cellule alors que quand je
mets
en
commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la
boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige
pas
Bonjour ligne Do While Cells(ligne,10) <> "fin" Cells(ligne, 10).Value = unedate ligne=ligne+1 Loop
Abed_H
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la cellule en cours. De plus ton code me donne le même effet (la boucle s'arrête des la première ligne)
"Ardus Petus" a écrit dans le message de news:u7BA%
Do While ActiveCell.Value <> "fin" Cells(activecell.row, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
du tout.
Merci d'avance.
Mickael
anonymousA
Bonjour,
ce code parcourt bien toutes cellules de la même colonne à partir de la 1ere cellule active sous réserve que les cellules actives parcourues ne soient pas égales à "fin" et ce jusqu'à ce que une cellule active soit égale à "fin". Ca c'est indéniable. Cependant, quel que soit le nombre de cellules parcourues, puisque les variables unedate et ligne en changent jamais lors du parcours de la boucle ( à moins que tu ne dises pas tout), alors la cellule Cells(ligne, 10) recevra toujours la même valeur.
A+
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du tout.
Merci d'avance.
Mickael
Bonjour,
ce code parcourt bien toutes cellules de la même colonne à partir de la
1ere cellule active sous réserve que les cellules actives parcourues ne
soient pas égales à "fin" et ce jusqu'à ce que une cellule active soit
égale à "fin". Ca c'est indéniable.
Cependant, quel que soit le nombre de cellules parcourues, puisque les
variables unedate et ligne en changent jamais lors du parcours de la
boucle ( à moins que tu ne dises pas tout), alors la cellule
Cells(ligne, 10) recevra toujours la même valeur.
A+
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin"
ActiveSheet.Cells(ligne, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en
commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la
boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du
tout.
ce code parcourt bien toutes cellules de la même colonne à partir de la 1ere cellule active sous réserve que les cellules actives parcourues ne soient pas égales à "fin" et ce jusqu'à ce que une cellule active soit égale à "fin". Ca c'est indéniable. Cependant, quel que soit le nombre de cellules parcourues, puisque les variables unedate et ligne en changent jamais lors du parcours de la boucle ( à moins que tu ne dises pas tout), alors la cellule Cells(ligne, 10) recevra toujours la même valeur.
A+
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du tout.
Merci d'avance.
Mickael
Ardus Petus
Dans ton code d'origine, tu n'incrémentes jamais la variable ligne.
-- AP
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du tout.
Merci d'avance.
Mickael
Dans ton code d'origine, tu n'incrémentes jamais la variable ligne.
--
AP
"Mickael LUNVEN" <micklunven__ntspm@yahoo.fr> a écrit dans le message de
news: eEurSYZhGHA.4044@TK2MSFTNGP03.phx.gbl...
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin"
ActiveSheet.Cells(ligne, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en
commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la
boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
du
tout.
Dans ton code d'origine, tu n'incrémentes jamais la variable ligne.
-- AP
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du tout.
Merci d'avance.
Mickael
lSteph
Bonsoir, peut-êtrefaire évoluer ligne dans ta boucle ... ligne=ligne+1 loop
Cordialement.
LSteph
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du tout.
Merci d'avance.
Mickael
Bonsoir,
peut-êtrefaire évoluer ligne dans ta boucle
...
ligne=ligne+1
loop
Cordialement.
LSteph
"Mickael LUNVEN" <micklunven__ntspm@yahoo.fr> a écrit dans le message de
news: eEurSYZhGHA.4044@TK2MSFTNGP03.phx.gbl...
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin"
ActiveSheet.Cells(ligne, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en
commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la
boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
du
tout.
Bonsoir, peut-êtrefaire évoluer ligne dans ta boucle ... ligne=ligne+1 loop
Cordialement.
LSteph
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas du tout.
Merci d'avance.
Mickael
lSteph
...pardon ABED je viens seulement de voir que tu avais donné la réponse
LSteph
"ABED HADDOU" a écrit dans le message de news:
Bonjour ligne Do While Cells(ligne,10) <> "fin" Cells(ligne, 10).Value = unedate ligne=ligne+1 Loop
Abed_H
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la cellule en cours. De plus ton code me donne le même effet (la boucle s'arrête des la première ligne)
"Ardus Petus" a écrit dans le message de news:u7BA%
Do While ActiveCell.Value <> "fin" Cells(activecell.row, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
du tout.
Merci d'avance.
Mickael
...pardon ABED je viens seulement de voir que tu avais donné la réponse
LSteph
"ABED HADDOU" <ABEDHADDOU@discussions.microsoft.com> a écrit dans le message
de news: C36B2AA9-E98D-4551-A169-716ED3DC7FE1@microsoft.com...
Bonjour
ligne
Do While Cells(ligne,10) <> "fin"
Cells(ligne, 10).Value = unedate
ligne=ligne+1
Loop
Abed_H
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la
cellule en cours.
De plus ton code me donne le même effet (la boucle s'arrête des la
première
ligne)
"Ardus Petus" <ardus.petus@laposte.net> a écrit dans le message de
news:u7BA%23bZhGHA.4864@TK2MSFTNGP03.phx.gbl...
Do While ActiveCell.Value <> "fin"
Cells(activecell.row, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
"Mickael LUNVEN" <micklunven__ntspm@yahoo.fr> a écrit dans le message
de
news: eEurSYZhGHA.4044@TK2MSFTNGP03.phx.gbl...
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin"
ActiveSheet.Cells(ligne, 10).Value = unedate
ActiveCell.Offset(1, 0).Select
Loop
Cette boucle reste bloqué sur la première cellule alors que quand je
mets
en
commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate",
la
boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige
pas
...pardon ABED je viens seulement de voir que tu avais donné la réponse
LSteph
"ABED HADDOU" a écrit dans le message de news:
Bonjour ligne Do While Cells(ligne,10) <> "fin" Cells(ligne, 10).Value = unedate ligne=ligne+1 Loop
Abed_H
En fait la ligne ou j'insere une date ne correspond pas à la ligne de la cellule en cours. De plus ton code me donne le même effet (la boucle s'arrête des la première ligne)
"Ardus Petus" a écrit dans le message de news:u7BA%
Do While ActiveCell.Value <> "fin" Cells(activecell.row, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
"Mickael LUNVEN" a écrit dans le message de news:
Bonjour a tous,
J'ai un soucis avec une boucle du genre :
Do While ActiveCell.Value <> "fin" ActiveSheet.Cells(ligne, 10).Value = unedate ActiveCell.Offset(1, 0).Select Loop
Cette boucle reste bloqué sur la première cellule alors que quand je mets
en commentaire la ligne "ActiveSheet.Cells(ligne, 10).Value = unedate", la boucle parcours bien toutes mes cellules.
Quelqu'un a-t-il une idée de la raison parce que la je seche. Je pige pas
