Bonjour à tous,
je souhaite intégrer cette formule dans mon code:
=SI(ET(O13>0,1;O13<300,1);"CD";SI(O13>300,1;"LD";SI(O13=0;"";SI(O13="";"";"FAUX"))))
J'ai tenté de rédiger un code mais ça ne fonctionne pas. Et à vrai dire je ne comprend pas pourquoi...
Voici le code:
J = "=IF(AND(O13>0,1,O13<300,1),""CD"",IF(O13>300,1,""LD"",IF(O13=0,"""",IF(O13="""","""",""""))))"
Range("P13").Formula = J
Range("P13").AutoFill Destination:=Range("P13:P1000"), Type:=xlFillDefault
Je souhaite que la formule s'applique en P13 puis soit tirée jusqu'en ligne 1000.
Merci d'avance pour votre help,
Tom