OVH Cloud OVH Cloud

programmation de cellule

2 réponses
Avatar
mini_bn42
Bonsoir à tous,

J'aimerais, sous vba, faire en sorte que lorsque par exemple les cellules A1
à A10 contiennent le mot "OK", la cellule B10 par exemple inscrive le mot
"OK", ou rien du tout dans le cas où les cellules n'ont pas toutes le mot
"OK". J'espère avoir été clair. Merci de votre aide.

2 réponses

Avatar
Patrick BASTARD
Bonjour, *mini_bn42*
J'ai lu ton post
avec le plus grand intéret :

Dans la cellule de ton choix :

=SI(NB.SI(A1:A10;"OK");"OK";"")


--
Bien cordialement,
P. Bastard

Bonsoir à tous,

J'aimerais, sous vba, faire en sorte que lorsque par exemple les
cellules A1 à A10 contiennent le mot "OK", la cellule B10 par exemple
inscrive le mot "OK", ou rien du tout dans le cas où les cellules
n'ont pas toutes le mot "OK". J'espère avoir été clair. Merci de
votre aide.


Avatar
Phil99999
Sub waaahou()

Range("B10").Value = ""
For Each cellule In Range("A1:A10")
If cellule.Text <> "OK" Then Exit Sub
Next
Range("B10").Value = "OK"

End Sub



Bonsoir à tous,

J'aimerais, sous vba, faire en sorte que lorsque par exemple les cellules A1
à A10 contiennent le mot "OK", la cellule B10 par exemple inscrive le mot
"OK", ou rien du tout dans le cas où les cellules n'ont pas toutes le mot
"OK". J'espère avoir été clair. Merci de votre aide.