formule de divisibilité

[JJ1]

Bonjour à tous,
Je souhaiterais votre aide pour écrire une formule qui me donne un résultat à 1 si au moins un (ou plus) des 5 nombres d'une suite est divisible par 2 ET 3 ET 5 , sinon 0 ?
ex:
1 4 9 10 15 renvoie 1 en F1
merci beaucoup

 

[Staple1600]

Re : formule de divisibilité

Bonjour


Tu peux de te servir de la fonction MOD

(voir aide Excel)

Un exemple rapide

 

[Pierrot93]

Re : formule de divisibilité

Bonjour JJ1

il faudrait tout d'abord savoir si tu veux utiliser des fonctions Excel ou bien un code vba.

Les nombres dans ton exemple sont dans la même cellules ou dans plusieurs ?

bonne journée
@+

 

[JCGL]

Re : formule de divisibilité

Bonjour à tous,
Salut JJ1,
Salut Staple,
Salut Pierrot,

Formule à rallonge que nos formulistes vont "sommeprodée"

=SI(OU(MOD(A1;5)=0;MOD(A1;3)=0;MOD(A1;2)=0;MOD(B1;5)=0;MOD(B1;3)=0;MOD(B1;2)=0;MOD(C1;5)=0;MOD(C1;3)=0;MOD(C1;2)=0;MOD(D1;5)=0;MOD(D1;3)=0;MOD(D1;2)=0;MOD(E1;5)=0;MOD(E1;3)=0;MOD(E1;2)=0);1;0)

A+

 

[JJ1]

Re : formule de divisibilité

Bonjour Staple1600, Pierrot93,
merci pour vos réponses, uniquement une formule car mon fichier est basé sur des formules.
Je connais la fonction MOD, c'est la mise en forme de la condition SI qui me pose problème.....
merci encore

 

[Lord Nelson]

Re : formule de divisibilité

Salut,


=SI(SOMMEPROD((MOD(A1:E1;2)=0)*(MOD(A1:E1;3)=0)*(MOD(A1:E1;5)=0))>0;1;0)

Mais il y a peut-être plus court !

A+
Horatio

 

[Lord Nelson]

Re : formule de divisibilité

Rebonjour à tous,

Attention JJ, dans ton exemple la formule renvoie 0 car aucun des cinq nombres donnés en exemple n'est divisible par 2 et 3 et 5 !
Le premier nombre ayant cette caratéristique serait 30 selon moi (2x3x5).

A+
Horatio

 

[JJ1]

Re : formule de divisibilité

Bonjour et merci à JCGL et Lord Nelson,
je vais tester....
merci pour votre aide PRECIEUSE ( certains comprendront ....)
bon WE

 

[JCGL]

Re : formule de divisibilité

Re,
Salut Horatio,

Je n'avais pas remarqué les ET... donc un zop pour ma formule

A+

Edition : JJ1, je suis toujours sur la liste ... arf arf (Private Joke)

 

[JJ1]

Re : formule de divisibilité

Re,
voir mon exemple, la condition ET n'est pas pour la "divisibilité" mais pour le fait qu'il faut que dans la suite il y ait au moins 1 nb divisible par 2 ET un nb divisible par 3 (pas forcément le même , c'est là le malentendu) et un nb divisible par 5.
les formules sont elle toujours exactes si on remplace * par + ?
merci

 

[JCGL]

Re : formule de divisibilité

Re,

Un zop de moins pour ma formule à rallonge YES 😛

Je te confirme que la formule d'Horatio fonctionne en remplaçant le * par +

A+

 

[JJ1]

Re : formule de divisibilité

Bravo JCGL... tu avais vu juste!
je confirme que tu es sur la liste d'attente....(j'ai bien noté attente !!)

je vous fait partager une histoire que l'on vient de m'envoyer...l'histoire de 2 amies blondes...une dit à l'autre en pleurant:
j'ai raté mon examen du permis de conduire, j'ai vu un panneau indiquant 50 et ensuite un giratoire et j'ai fait cinquante fois le tour et je ne l'ai pas eu....sniff

Ah bon, di son amie, il t'en manquait combien???

Mon Dieu faites que Monique soit brune....(sinon Adieu aux formules!)
bon appêtit

 

[Lord Nelson]

Re : formule de divisibilité

Re,

Donc au moins un nombre divisible par 2 ou 3 ou 5 :

=SI(SOMMEPROD((MOD(A1:E1;2)=0)+(MOD(A1:E1;3)=0)+(MOD(A1:E1;5)=0))>0;1;0)

Au moins un nombre pair et au moins un nombre divisible par 3 et au moins un nombre divisible par 5 :

=SI(SOMMEPROD((MOD(A1:E1;2)=0)*1)*SOMMEPROD((MOD(A1:E1;3)=0)*1)*SOMMEPROD((MOD(A1:E1;5)=0)*1)>0;1;0)


Merci Aspro !

A+
Horatio

 

[Monique]

Re : formule de divisibilité

Bonjour,

à essayer
=1*(SOMMEPROD((MOD(A1:E1;{2;3;5})=0)*1)>0)

 

[JeanMarie]

Re : formule de divisibilité

Bonjour tout le monde

Une autre proposition, avec FREQUENCE
=SI(FREQUENCE(MOD(A1:E1;{2;3;5});{0});1;0)

PS, on est pas obligé de mettre les {}, pour la matrice de FREQUENCE
ce qui donne =SI(FREQUENCE(MOD(A1:E1;{2;3;5});0);1;0)

@+Jean-Marie