Réaliser une macro
bob2024 Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
Bonsoir,
j'ai réalisé ces 2 formules qui fonctionnent parfaitement sur Excel. J'aimerais la simplifier ou alors la remplacer par une macro. Quelqu'un pourrait il m'aider s'il vous plait?
Je vous remercie infiniment par avance
=SI(OU(J3="";GAUCHE(O3;4)="radi";GAUCHE(O3;3)="rdc";GAUCHE(O3;8)="réaffect";GAUCHE(O3;5)="réint";GAUCHE(O3;5)="résil");"-";SI(GAUCHE(O3;19)="COMMENTAIRE relancé";"En cours";SI(GAUCHE(O3;7)="relancé";"En cours";SI(MOIS(DATE(ANNEE(J3);MOIS(J3);JOUR(J3)+1))>5;CONCATENER(ANNEE(DATE(ANNEE(J3);MOIS(J3);JOUR(J3)+1));"/0";MOIS(DATE(ANNEE(J3);MOIS(J3);JOUR(J3)+1))-5);SI(MOIS(DATE(ANNEE(J3);MOIS(J3);JOUR(J3)+1))<3;CONCATENER(ANNEE(DATE(ANNEE(J3);MOIS(J3);JOUR(J3)+1))-1;"/0";MOIS(DATE(ANNEE(J3);MOIS(J3);JOUR(J3)+1))+7);CONCATENER(ANNEE(DATE(ANNEE(J3);MOIS(J3);JOUR(J3)+1))-1;"/";MOIS(DATE(ANNEE(J3);MOIS(J3);JOUR(J3)+1))+7)))))).
=SI(Q3="De carrière";"sans";SI(P3="";"-";SI(OU(P3>J3;P3=J3;P3="fin det";GAUCHE(O3;4)="radi";GAUCHE(O3;5)="resil");"Ok";SI(MOIS(P3)<10;CONCATENER(ANNEE(P3)-1;"/0";MOIS(P3));CONCATENER(ANNEE(P3)-1;"/";MOIS(P3))))))
- Réaliser une macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Réaliser un organigramme - Guide
- Jitbit macro recorder - Télécharger - Confidentialité
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro maker - Télécharger - Divers Utilitaires
3 réponses
Bonjour, ami Le Pingou, et Bonne Année !
Je vais quand même proposer une réponse à bob2024 :
* Une macro ? Cela me parait une mauvaise idée ...
* Une simplification de la seconde formule ? Il n'y en a pas, à mon avis.
* Une simplification de la première formule ? Peut-être :
Si elle est dans la cellule A1, on va dans FORMULE / Noms définis / Définir un nom et on crée le nom M qui fait référence à
=MOIS(DATE(ANNEE(Feuil1!J3);MOIS(Feuil1!J3);JOUR(Feuil1!J3)+1))
et le nom A qui fait référence à
=ANNEE(DATE(ANNEE(Feuil1!J3);MOIS(Feuil1!J3);JOUR(Feuil1!J3)+1))
On peut alors faire Rechercher/Remplacer pour insérer M et A à la place des 2 expressions, ce qui donne la formule
=SI(OU(J3="";GAUCHE(O3;4)="radi";GAUCHE(O3;3)="rdc";GAUCHE(O3;8)="réaffect";GAUCHE(O3;5)="réint";GAUCHE(O3;5)="résil");"-";SI(GAUCHE(O3;19)="COMMENTAIRE relancé";"En cours";SI(GAUCHE(O3;7)="relancé";"En cours";SI(M>5;CONCATENER (A;"/0";M-5);SI(M<3;CONCATENER(A-1;"/0";M+7);CONCATENER(A-1;"/";M+7))))))