OVH Cloud OVH Cloud

boucle conditionnelle "ou"

10 réponses
Avatar
Joël
Bonjour,
Je cherche =E0 identifier les cellules vides ou de valeur=20
nulle dans une colonne.
Ma macro est cens=E9e stopper sur chacune des cellules=20
remplissant l'une ou l'autre condition.
Je ne parviens pas =E0 r=E9aliser la condition =AB ou =BB..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Jo=EBl


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub=20

10 réponses

Avatar
Jean-Claude
Salut
Sans essai et à l'intuition je dirais qu'il manque la condition à ta seconde
"condition"
cad

Do While ActiveCell.Value <> "" Or ActiveCell.Value <> "0,00"

A+
Jc
"Joël" a écrit dans le message de
news:061101c3de87$087eba20$
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub
Avatar
Ellimac
Bonjour,

Do While ActiveCell <> "" Or ActiveCell =0

Camille

-----Message d'origine-----
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub

.



Avatar
S
-----Message d'origine-----
Salut
Sans essai et à l'intuition je dirais qu'il manque la
condition à ta seconde

"condition"
cad

Do While ActiveCell.Value <> "" Or ActiveCell.Value
<> "0,00"


A+
Jc
"Joël" a écrit dans
le message de

news:061101c3de87$087eba20$
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub


.



Avatar
Salut Jean Claude
J'avais pensé la même chose que toi mais cela ne marche
pas mieux....La boucle ne s'arrête pas...
Il y a surement autre chose....
Cordialement Joël
-----Message d'origine-----
Salut
Sans essai et à l'intuition je dirais qu'il manque la
condition à ta seconde

"condition"
cad

Do While ActiveCell.Value <> "" Or ActiveCell.Value
<> "0,00"


A+
Jc
"Joël" a écrit dans
le message de

news:061101c3de87$087eba20$
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub


.



Avatar
joel
Salut Jean Claude
J'avais pensé la même chose que toi mais cela ne marche
pas mieux....La boucle ne s'arrête pas...
Il y a surement autre chose....
Cordialement Joël
-----Message d'origine-----
Salut
Sans essai et à l'intuition je dirais qu'il manque la
condition à ta seconde

"condition"
cad

Do While ActiveCell.Value <> "" Or ActiveCell.Value
<> "0,00"


A+
Jc
"Joël" a écrit dans
le message de

news:061101c3de87$087eba20$
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub


.



Avatar
joel
Salut Jean Claude
J'avais pensé la même chose que toi mais cela ne marche
pas mieux....La boucle ne s'arrête pas...
Il y a surement autre chose....
Cordialement Joël
-----Message d'origine-----
Salut
Sans essai et à l'intuition je dirais qu'il manque la
condition à ta seconde

"condition"
cad

Do While ActiveCell.Value <> "" Or ActiveCell.Value
<> "0,00"


A+
Jc
"Joël" a écrit dans
le message de

news:061101c3de87$087eba20$
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub


.



Avatar
joel
Salut Jean Claude
J'avais pensé la même chose que toi mais cela ne marche
pas mieux....La boucle ne s'arrête pas...
Il y a surement autre chose....
Cordialement Joël
-----Message d'origine-----
Salut
Sans essai et à l'intuition je dirais qu'il manque la
condition à ta seconde

"condition"
cad

Do While ActiveCell.Value <> "" Or ActiveCell.Value
<> "0,00"


A+
Jc
"Joël" a écrit dans
le message de

news:061101c3de87$087eba20$
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub


.



Avatar
ru-th
Salut

Do While ActiveCell.Value <> 0
devrait suffire

a+
rural thierry

"Joël" a écrit dans le message de
news: 061101c3de87$087eba20$
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub
Avatar
Ellimac
Rebonjour,

Ceci devrait mieux convenir :
Sub Toto()
der = Range("a65000").End(xlUp).Row
Range("a1").Select
While ActiveCell.Row <> der
If ActiveCell = 0 Then MsgBox "ligne vide ou nulle"
ActiveCell.Offset(1).Select
Wend
End Sub

Camille

-----Message d'origine-----
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub

.



Avatar
Joël
Merci de ton aide Thierry!
Ca marche!...
Excuses les messages en double...J'ai eu le hoquer....
Cordialement Joël

-----Message d'origine-----
Salut

Do While ActiveCell.Value <> 0
devrait suffire

a+
rural thierry

"Joël" a écrit dans
le message de

news: 061101c3de87$087eba20$
Bonjour,
Je cherche à identifier les cellules vides ou de valeur
nulle dans une colonne.
Ma macro est censée stopper sur chacune des cellules
remplissant l'une ou l'autre condition.
Je ne parviens pas à réaliser la condition « ou »..
Quelqu'un peut il m'aider SVP .Merci d'avance..
Cordialement Joël


Sub test()
Do While ActiveCell.Value <> "" Or "0,00"
ActiveCell.Offset(1, 0).Select
Loop
End Sub


.