XL 2021 Prendre la valeur d'une cellule pour faire un calcul et mettre ce calcul dans la cellule initiale

[François76]

Bonsoir,

Pour information, je n'ai jamais fait de macro et j'arrive à manipuler des formules.

Le journal des ventes d'une coopérative a été créé et il est fonctionnel sous Excel.

Nous voudrions ajouter une nouvelle fonctionnalité, qui est traitée avec une fiche papier actuellement.

Certains sociétaires ont un compte, c'est à dire qu'ils versent une somme d'argent sur leur compte.
Ils font leurs courses, et au fur et à mesure le montant de leurs courses est déduit de leur compte.
Dans la feuille "Sociétaires", j'envisage de créer une colonne "Compte" qui affichera le solde du sociétaire A.
Cette colonne sera initialisée manuellement au départ en prenant la valeur de la fiche papier.
Ensuite, en tapant le numéro de sociétaire dans la feuille "Vente Semaine X", son nom et prénom apparaissent de façon automatisée dans 2 colonnes (c'est fonctionnel).
Après il y a 3 autres colonnes pour le règlement : "Espèces", "Chèque", "CB".
Dans cette feuille "Vente Semaine X", je pense ajouter deux colonnes à la suite, une première "Débit Compte" et une deuxième "Versement Compte".
Et terminer en ajoutant une colonne "Compte du jour" dont le calcul sera le suivant :
"Compte sociétaire A" (à récupérer sur la feuille "Sociétaires") - "Débit compte" + "Versement compte"
Jusque là cela ne me pose pas de problème de formules.
Par contre, je souhaite que ce dernier calcul mette à jour la valeur initiale du compte du sociétaire dans la feuille "Sociétaires" et là je ne sais pas si c'est possible d'effectuer ce calcul car j'ai l'impression que c'est une boucle ?

Merci d'avoir pris le temps de me lire et éventuellement de m'aider.

Cordialement, François

 

[Dranreb]

Bonsoir
faites une macro qui réinitialise la colonne du compte initial aux valeurs du compte du jour avant d'effacer les débits et versements
Si vos données sont en tableau Excel :

Sub RéinitComptes()
   [TabSoc[Compte sociétaire A]].Value = TabSoc[Compte du jour].Value
   [TabSoc[Débit compte]].ClearContents 
   [TabSoc[Versement compte]].ClearContents
   End Sub

TabSoc étant bien sûr à remplacer le cas échéant par le vrai nom du tableau.

 

[fanfan38]

Bonjour et bienvenu sur le forum
Un fichier est TOUJOURS le bienvenu
Ci joint une solution....

A+ François

 

[François76]

Bonjour,

Déjà merci pour vos réponses.

Comme demandé, je vous joins le fichier "Journal des ventes annuel" que j'ai anonymisé et qui n'a que 3 semaines.
Il doit être possible de faire mieux au niveau présentation...
Je souhaiterais que la cellule "Solde Compte" du sociétaire W de la feuille "Semaine x" mette à jour la cellule "Compte" du sociétaire W de la feuille "Sociétaires".
Au prochain achat du sociétaire W, cela permettrait de récupérer son nouveau solde de son compte et ainsi de suite.

Par avance merci, François

 

[Dranreb]

Le problème c'est que si vous le faites systématiquement dès la saisie d'une valeur dans Ventes Compte, Versement Compte ou Remboursement Compte, la formule en Solde Compte devient fausse
Alors je pense qu'il faut écrire une macro qui met à jour tous les comptes et effacent ces cellules.

 

[fanfan38]

Bonjour
Ci joint ma solution
Je comprends pas: total des ventes => tu ne compte pas les comptes....

A+ François