A voir également:
- Probleme de code sur mon VBA
- Code asci - Guide
- Code puk bloqué - Guide
- Code de déverrouillage oublié - Guide
- Code blocks free - Télécharger - Langages
- Code windows 10 - Guide
2 réponses
M-12
Messages postés
1333
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
8 avril 2023
299
29 déc. 2017 à 17:01
29 déc. 2017 à 17:01
Bonjour,
Comme ceci
Il faut faire attention au virgule et/ou point virgule ainsi qu'au ""
Comme ceci
ActiveCell.FormulaR1C1 = "=IF(TODAY()=TEXT(DAY(RC[-1])&""/""&MONTH(RC[-1])&""/""&YEAR(TODAY()),""jj/mm/aaaa"")+0,""Anniversaire"",IF(AND(TODAY()>=TEXT(DAY(RC[-1])&""/""&MONTH(RC[-1])&""/""&YEAR(TODAY()),""jj/mm/aaaa"")-5,TODAY()<0 + TEXT(DAY(RC[-1])&""/""&MONTH(RC[-1])&""/""&YEAR(TODAY()),""jj/mm/aaaa"")),""Bientôt Anniversaire"",""""))"
Il faut faire attention au virgule et/ou point virgule ainsi qu'au ""
