Office 365 Comparer date incrémentée avec une autre date

Tieuma66

XLDnaute Nouveau
Bonjour le forum,

Je bloque sur une formule, un petit coup de main serait le bien venu. Voici mon code

VB:
Worksheets("Retard AirSupply").Range("Tableau3[Flag>15J]").FormulaR1C1 = _
    "=IF([Date Demandée]+15<R11C109,""oui"",""non"")"
Je pense que ça doit venir du symbole "<" mais je n'arrive à rien.

Cette formule est censée comparer 2 dates : si la date de la colonne [date demandée], incrémentée de +15 jours, est inférieur à une date entrée manuellement en cellule R11C109, et alors reporter "oui", ou sinon reporter "non".

Je me doute qu'il y a de bien meilleur façon de l'écrire mais je ne suis pas un as... long de là!

Pouvez-vous m'aider à coder ça svp.

Je n'ajoute pas mon fichier car très lourd et beaucoup de modif à faire avant diffusion... si besoin dites moi.

Merci à vous
 

Fichiers joints

Dranreb

XLDnaute Barbatruc
Bonjour.
Il y a un espace, déjà, dans le titre entre "Flag" et ">15J"
Mais d'abord ça coince parce qu'il ne semble pas y avoir de Tableau7.
Mais sur pour l'instruction indiquée il ne semble pas y avoir non plus de 'Date demandée
Si en Tableau3[Flag >15J] ça doit être :
Code:
=SI([@[Dte dem]]+15>$DE$11;"oui";"non")
Alors c'est plutôt
VB:
Feuil1.[Tableau3[Flag >15J]].FormulaR1C1 = "=IF([@[Dte dem]]+15>R11C109,""oui"",""non"")"
 
Dernière édition:

Discussions similaires


Haut Bas