XL pour MAC Bonjour, Besoin d'aide pour un calcul de réduction avec conditions - Merci

[soulève]

Bonjour à tous, je suis nouveau et novice dans l'utilisation d'excel !
J'ai un calcul simple apparement mais sur lequel je bute et n'arrive pas à trouver la solution.
J'ai en cellule B26 un résultat à deux chiffres que je souhaite réduire en dessous de 10 mais la condition est que je ne dois pas réduire si c'est 11 ou 22. et avoir le résultat dans une autre cellule


Merci

 

[soulève]

Re

C'est donc une réduction théosophique particulière car selon ce qu'on lit (toujours sans le second fil)

NB: Tu as essayé la formule de Modeste geedee?
(voir message#13)

je vais la tester pour voir et surtout pour que tu ne sois pas intervenu pour rien Merci à toi Staple

 

[soulève]

je vais la tester pour voir et surtout pour que tu ne sois pas intervenu pour rien Merci à toi Staple

Je viens de tester et cela ne fonction pas sur tout, lorsque j'ai 21 en résultat B26 il ne réduit pas à 3 je reste sur la formule de Sylvanu ...

Merci bonne fin de soirée à tous

 

[Staple1600]

Re

Merci de ta sollicitude.
Mais je n'interviens jamais pour rien
Puisque chaque connexion sur XLD procure du plaisir
1) à mon clavier
2) à mes neurones
3) à G..gle


Et parfois, les soirs sans lune, il arrive que mes réponses aident le lecteur

 

[Staple1600]

Re

NB:
Chez moi, 21 est bien réduit à 3

 

[soulève]

Re

Merci de ta sollicitude.
Mais je n'interviens jamais pour rien
Puisque chaque connexion sur XLD procure du plaisir
1) à mon clavier
2) à mes neurones
3) à G..gle


Et parfois, les soirs sans lune, il arrive que mes réponses aident le lecteur

Connais tu le référentiel de Naissance ?

 

[Staple1600]

Re

Fais-ce petit test sur une feuille vierge

Sub reduction()
[A1] = 1: [A1:A50].DataSeries
[B1:B50] = "=IFERROR(MAX(MOD(RC[-1],9),9*(MOD(RC[-1],9)=0)),""?"")"
Application.Goto [A21], True
End Sub

Tu obtiens bien 3, non?

 

[Staple1600]

Re,

Connais tu le référentiel de Naissance ?

Moi, non
Mais G••gl•, oui

 

[soulève]

Re

Fais-ce petit test sur une feuille vierge

Sub reduction()
[A1] = 1: [A1:A50].DataSeries
[B1:B50] = "=IFERROR(MAX(MOD(RC[-1],9),9*(MOD(RC[-1],9)=0)),""?"")"
Application.Goto [A21], True
End Sub

Tu obtiens bien 3, non?

Non désolé mais le résultat reste sur 21 ???

 

[Staple1600]

Re

Il faut regarder dans la colonne B
(là où il y a les formules)
Il y a bien 3 en B21, non ?

 

[soulève]

Re

Il faut regarder dans la colonne B
(là où il y a les formules)
Il y a bien 3 en B21, non ?

J'applique ta formule en B28 mais le nombre sur lequel est effectué le calcul se trouve en B26 et pour 21 qui est en B26 il ne réduit pas à 3 en B28

 

[mapomme]

Bonsoir @Staple1600 ,
Et ceci =1+MOD(A1-1;9), ça marche ?

 

[Staple1600]

Re

j'ai bien parlé de faire le test sur une feuille vierge
C'est un test pour voir l'effet de la formule

Ensuite, on peut adapter.

Ma question était donc:
Si tu testes la macro sur une feuille vide, tu obtiens bien 3 en B21
(avec en A21 le nombre 21)
La réduction se fait donc bien.

 

[Staple1600]

Bonsoir @Staple1600 ,
Et ceci =1+MOD(A1-1;9), ça marche ?

Bonsoir mapomme

Cela ne fonctionne qu'avec le paramètre que tu as oublié

Sub reduction_II()
[A1] = 1: [A1:A50].DataSeries
[B1:B50] = "=IFERROR(MAX(MOD(RC[-1],9),9*(MOD(RC[-1],9)=0)),""?"")"
[C1:C50] = "=1+MOD(A1-1,9)+N(""mapomme"")"
Application.Goto [A21], True
[B21].Font.Bold = True
[B21].Interior.ColorIndex = 4
End Sub

 

[soulève]

Re

j'ai bien parlé de faire le test sur une feuille vierge
C'est un test pour voir l'effet de la formule

Ensuite, on peut adapter.

Ma question était donc:
Si tu testes la macro sur une feuille vide, tu obtiens bien 3 en B21
(avec en A21 le nombre 21)
La réduction se fait donc bien.

je dois louper un truc car non la j'obtient 9

 

[Staple1600]

Re

Il se passe de drôles de truc sur les MACS
Normalement, tu devrais avoir ceci