combiner des chiffres pour trouver un total (consolider des factures)

[gosselien]

Bonjour à tous,

un ex-collègue me pose le problème suivant:

Un fournisseur paye une somme pour des factures mais sans nous préciser quelles factures sur les 10 qu'il y a en attente, de régularisation il a payé...

Un exemple ici:

https://www.dropbox.com/s/fqrbw7cy6xpidvi/combinaisons.xlsm?dl=0

Many thanks

 

[XOR LX]

Bonjour.

Est-ce qu'une solution non-VBA te conviendrait?

Cordialement

 

[gosselien]

Bonjour ,

à vrai dire ça me convient en VBA ET en formule ; merci !!!!

Patrick

 

[XOR LX]

Il faut tout d'abord accéder au Gestionnaire de Noms (ruban Formule) et définir:

Nom: Liste
Fait référence à: =$E$3:$E$12

Nom: Arry1
Fait référence à: =LIGNE(INDIRECT("1:"&LIGNES(Liste)))

Nom: Arry2
Fait référence à: =LIGNE(INDIRECT("1:"&2^LIGNES(Liste)))

La formule matricielle** en F3 est donc:

=SI(ESTNUM(EQUIV(LIGNES($1:1);SI(INDEX(MOD(ENT((Arry2-1)/2^(TRANSPOSE(Arry1)-1));2);PETITE.VALEUR(SI(PRODUITMAT(MOD(ENT((Arry2-1)/2^(TRANSPOSE(Arry1)-1));2);Liste)=$O$1;Arry2);COLONNES($A:A));0);TRANSPOSE(Arry1));0));"X";"")

Et à copier vers le bas et à la droite.

En fait, si ça ne vous dérange pas, j'aimerais bien utiliser votre exemple pour en faire une poste sur mon site, à complémenter celle-ci:

Which numbers add up to total? « EXCELXOR

ce qui paraîtra sous peu!

Cordialement


** Les formules matricielles ne sont pas entrées de la même manière que les formules «standards». Vous les créez de la même façon que des formules standard simples, en les faisant précéder d’un signe égal (=), mais vous les validez en appuyant sur CTRL+MAJ+ENTRÉE et non uniquement sur ENTRÉE.

 

[gosselien]

Oui pas de soucis pour le mettre sur ton site ( just add : question by : Patrick MAC KAY - Belgium )
Je vais tester ça, merci


post scriptum: je trouve cette formule FABULEUSE !!!

Merci !!!

J'aimerais que quelqu'un le fasse en VBA, pour une plus grande rapidité , je n'en suis pas capable

Patrick

 

[XOR LX]

Je t'en prie!

Et je m'assurerai que je mentionnerai ton nom!!

Cordialement