XL 2016 Formule à corriger

[XVA]

=SI(OU(B10="";C10="");"";SI(C10<AUJOURDHUI();"Périmé";SI(DATEDIF(AUJOURDHUI();C10;"m")>0;DATEDIF(AUJOURDHUI();C10;"m")&" mois et ";"")&DATEDIF(AUJOURDHUI();C10;"md")&SI(DATEDIF(AUJOURDHUI();C10;"md")=1;" jour";" jours")))

Bonjour,

Je viens d'ouvrir un magasin alimentaire dans lequel je gère les dates de péremption des produits avec un fichier Excel + Macro. Par contre, voici ci-dessus une formule (récupérée dans une discussion sur ce site) que je n'arrive pas à mettre à jour. Le but est simplement d'enlever le "s" à jour quand la formule indique "0 jour".

je joins un fichier test établi ce matin afin de vous permettre de voir le principe d'utilisation que j'en fait. La ligne 10 correspond à la formule récupérée (D10) et la ligne 8 à la modification apportée (D8) et son résultat peu probant !!

En vous remerciant par avance,

XVA

 

[XVA]

Bonjour Job75. Merci pour ce retour rapide ! Je ne changerais plus la dénomination des feuilles du fichier. Je peux changer le nom du mois mais pas la forme de l'année, si j'ai bien compris...

Bonne soirée !

XVA

 

[job75]

Si vous voulez utiliser le nom "S19 - S23 Mai 2023" il faut en début de macro remplacer :

mois = s(UBound(s) - 1) & " " & "20" & s(UBound(s))

par :

mois = s(UBound(s) - 1) & " " & s(UBound(s))

 

[XVA]

Merci, je copie vos deux macros afin de le faire si besoin. Mais le nom de l'onglet est compréhensible avec "23" au lieu de "2023" !!

Merci une nouvelle fois pour votre aide. Bon week-end.

XVA

 

[XVA]

Bonsoir Job25.

Je reviens vers vous pour savoir s'il est possible d'ajouter le transfert de la date en même temps que le montant et les n° (tickets ou facture) dans la programmation que vous avez écrite il y a quelques temps.
Le fichier 01 est l'actuel et le 02 est celui comprenant les dates dans le dernier onglet qui accueil le transfert des onglets précédents.
En vous remerciant !

XVA

 

[job75]

Bonjour XVA,

Pourquoi avez-vous modifié les noms des onglets ? "Semaine 01 - Mois 2023" n'a pas de sens.

Enfin je ne comprends pas ce que vous voulez, quel est le problème ?

A+

 

[XVA]

Le nom des onglets est celui de fichier de base. Je le nomme à chaque mise en route en fonction du mois concerné "Semaine 23 - Juin 2023" par exemple et je nomme l'onglet de fin par "juin 23" et non "juin 2023" comme vous me l'aviez fait remarqué.
Je vous adresse l'exemple de ce qu'il serait très bien de modifier dès demain sur un fichier joint.

Belle soirée à vous,

XVA

 

[XVA]

Bonjour Job75,

Voici comme convenu le tableau avec les informations :

Onglet 1 (Semaine 1) : infos n° de ticket + Montant + date (3 janvier 2023 en haut de la partie liée à la journée) + infos n° de carte + Montant + date (3 janvier 2023 en haut de la partie liée à la journée).

Dernier onglet : tableau du report modifié par l'ajout des colonnes dates. Votre programmation n'est donc plus active, j'ai ajouté cela à la main.

Suis joignable si cela n'est pas clair pour vous.

Merci et bon dimanche !

XVA

 

[job75]

Bonjour XVA,

Tout ce que je vois ce sont des #N/A dans la 1ère feuille.

Et la macro qui beugue.

A+

 

[XVA]

Désolé Job75, le fait d'avoir modifier l'organisation du dernier onglet (colonnes dates) ne permet plus à votre Macro de fonctionner.
Ci-joint le fichier d'origine. Dans l'onglet 1, les infos à recopier dans le tableau du dernier onglet sont jaunis. Les montants et numéros de facture ou de coupons fonctionnent déjà. La question est de savoir s'il est possible d'ajouter la date de chaque transaction dans ce tableau du dernier onglet ?

En vous remerciant,

XVA

 

[job75]

Bonjour XVA,

Toujours pas compréhensible, désolé j'abandonne.

A+

 

[XVA]

Désolé de ne pas avoir été clair dans ma demande, Job75. Je demande juste si l'on peut ajouter la date du paiement dans les infos de la Macro que vous avez déjà faite, et qui fonctionne très bien.

Merci en tout cas pour le temps que vous avez déjà consacré à répondre à mes demandes.

Belle fin de journée,

XVA