XL 2013 répartitions frais

Gégé-45550

XLDnaute Accro

• 14 Août 2024

• #2

Bonjour,
Allez voir ICI.
Cordialement,

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 14 Août 2024

• #3

Hello
en gros, tu veux te faire un tricount maison :-D

en PJ un truc que je m'étais fait pour suivre les dépenses pendant des vacances.

manque "juste" la partie: équilibrage des comptes pour définir qui doit rembourser combien à qui
mais au moins: on voit ceux qui doivent de l'argent (combien) et ceux qui ont avancé..

 

Pièces jointes

• Tricount.xlsm

  27.4 KB · Affichages: 5

Vote positif 0 Vote négatif

Gégé-45550

XLDnaute Accro

• 14 Août 2024

• #4

stef12345 à dit:

Bonjour,
j'aimerais faire un tableau pour la répartitions des frais en vacances, j 'ai commencé mais j'aimerais que la colonne I21 à I24 puisse calculer l'argent a récupérer, par exemple Laurène a avancé 500€ j'aimerais donc que sur la casse I20 apparaisse ce qu'elle doit récupérer par rapport au total de sa participation dans l'exemple 398€, après si cela est possible ce serait top s'il y avait moyen de dire par exemple Léa doit 100 à Laurène etc en fonction de ce que chacun aura mis... j'espère avoir été suffisamment clair...
merci beaucoup de' votre aide

Cliquez pour agrandir...

Perso,
Je ferais comme ça (voir colonnes L à R)
On peut aussi faire évoluer avec d'autres clés de répartition, voire des clés différentes par type de dépenses.
Cdlt

 

Pièces jointes

• repartition vacances (GG).xlsx

  19.8 KB · Affichages: 7

Vote positif 0 Vote négatif

piga25

XLDnaute Barbatruc

• 14 Août 2024

• #5

Bonjour,
Une solution avec qui doit à qui.

 

Pièces jointes

• repartition vacances (GG).xlsm

  32.8 KB · Affichages: 6

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 14 Août 2024

• #6

Ca faisait un moment que je me disais qu'il fallait que je fasse l'équilibrage..
ce fut l'occasion.. voici

 

Pièces jointes

• Tricount.xlsm

  34.8 KB · Affichages: 8

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 14 Août 2024

• #7

Hello Piga25

à priori, ta solution ne fonctionne pas...
ces deux instructions donnent 0

VB:

GrandEcart = Application.Max(Ecarts)
PetitEcart = Application.Min(Ecarts)

ce qui à mon avis, n'est pas le résultat escompté..

 

Vote positif 0 Vote négatif

piga25

XLDnaute Barbatruc

• 14 Août 2024

• #8

Hello vgendron,
Oui je viens de m'en rendre compte.
Par contre le code fonctionnait avant que je fasse une mise en page (voir les résultats affichés).
Je ne vois pas ou cela coince maintenant.

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 14 Août 2024

• #9

Dans ton code, Ecarts est défini comme un array
je doute que max(array()) fonctionne
peut etre que Ecarts c'était AUSSI une table structurée dans la feuille ??

 

Vote positif 0 Vote négatif