XL 2016 Feuille calcul

[Strongole]

Sur XL 2016 je voudrais faire une feuille de calcul pour de la comptabilité.
Ex: un client me fait un cheque de 2538,48 et je doit associer ce montant a plusieurs montants et bien entendu, le client n'a pas pris soin de noter les numéros de facture associé a ce cheque.
Comment faire une feuille de calcul qui retrouve automatiquement les montant associé au total?

250,00$
288,48$
429,27
338,90
1500,00$
500,00$
=2538,48$

 

[Dranreb]

Bonsoir.
S'il n'y a pas trop de montants, il est possible d'examiner tous les cas en VBA. et de renvoyer la somme la plus proche.
Chaque montant supplémentaire double le nombre d'éventualités à envisager.

 

[Dranreb]

Cette fonction perso, à utiliser dans une formule matricielle verticale de 2 colonnes, vous renverrait les montants impliqués et leur numéros d'ordres dans une liste de montants possibles.

Function CompoSomme(ByVal SRéf As Double, ByVal TDon) As Variant
   Dim N As Long, S As Double, LDon As Long, D As Double, _
      MeilD As Double, MeilN As Long, TRés(), LRés As Long
   If TypeOf TDon Is Range Then TDon = TDon.Value
   MeilD = 2E+222
   For N = 0 To 2 ^ UBound(TDon, 1) - 1
      S = 0
      For LDon = 1 To UBound(TDon, 1)
         If N And 2 ^ (LDon - 1) Then S = S + TDon(LDon, 1)
         Next LDon
      D = Abs(S - SRéf): If D < MeilD Then MeilN = N: MeilD = D
      Next N
   ReDim TRés(1 To UBound(TDon, 1), 1 To 2)
   For LDon = 1 To UBound(TDon)
      If MeilN And 2 ^ (LDon - 1) Then LRés = LRés + 1: _
         TRés(LRés, 1) = TDon(LDon, 1): TRés(LRés, 2) = LDon
      Next LDon
   CompoSomme = TRés
   End Function

Spécifiez en arguments la somme à obtenir puis la plage verticale des montants possibles.

Validation matricielle: Ctrl+Maj+Entrée.

 

[zebanx]

Bonsoir Strongole, Dranreb, le fil

Un fichier pratique pour les combinaisons qui pourrait faire l'affaire.

Bien pratique je trouve.

Bonne soirée