Probleme de code sur mon VBA
Joanito
-
Joanito -
Joanito -
Bonjour tous le monde,
J'arrive pas a faire marcher ma macro si-dessous :
Je sais que celle-ci marche :
Je pense que le problème vient de là :
Pouvez-vous m'aider ? Merci beaucoup à tous!
Cordialement
J'arrive pas a faire marcher ma macro si-dessous :
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"";""))"
Je sais que celle-ci marche :
ActiveCell.FormulaR1C1 = "=IF(TODAY()=TEXT(DAY(RC[-1])&""/""&MONTH(RC[-1])&""/""&YEAR(TODAY()),""jj/mm/aaaa"")+0,""Anniv"")"
Je pense que le problème vient de là :
ActiveCell.FormulaR1C1 = "=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"",""))"
Pouvez-vous m'aider ? Merci beaucoup à tous!
Cordialement
A voir également:
- Probleme de code sur mon VBA
- Code ascii - Guide
- Code puk bloqué - Guide
- Code de déverrouillage oublié - Guide
- Code activation windows 10 - Guide
- Scanner qr code pc - Guide
2 réponses
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 ""
