Excel VBA vérification d'échéance

Bonjour mon petit code vérification qui fonctionnait au paravent ne fonctionne plus je ne comprends plus pourquoi?

=SI(ET(K21>0;D21+30<AUJOURDHUI());"Retard" ; SI(K21>0;"En cours"; "Soldé"))

il est sensé vérifier que la date inscrite dans le tableau excède bien 30 jours pour m'afficher retard. Mais quand je modifie la date en question de deux mois il me met toujours en cours là je suis un peu perdu

Bonjour,

On ne sait pas vraiment à quoi font référence les cellules K21 et D21. D'intuition, je transformerais votre formule ainsi :

=SI(K21<=0; "Soldé"; si( D21 + 30 < AUJOURDHUI(); "Retard" ;"En cours"))

Et logiquement, si j'interprète bien, je la modifierais plutôt ainsi :

=SI(K21<=0; "Soldé"; si( D21 + 30 < AUJOURDHUI() ;"En cours"; "Retard"))

Cdlt,

desolé K21 fais référence à la au reste à payer et d21 à la date

Et alors, ça marche finalement ? En supposant que c'est un reste dû client :

=SI(K21<0;"Créditeur"; SI(K21=0; "Soldé"; si( AUJOURDHUI() < D21 + 30 ;"En cours"; "Retard")))

Edit : ça devrait être bon...