Discussion :

[klowba]

Le code ultra simple ci-dessous plante (erreur 1004) et je ne sais pas pourquoi!
La formule est-elle trop longue?

Merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub Macro4()
 
    Range("X2").Select
    ActiveCell.FormulaR1C1 = "=IF(RC[-11]<59,7998;5,99;IF(AND(RC[-11]>59,7999;RC[-11]<119,5998);6,99;IF(AND(RC[-11]>119,5999;RC[-11]<179,3998);7,99;IF(AND(RC[-11]>179,3999;RC[-11]<239,1998);8,99;IF(AND(RC[-11]>239,1999;RC[-11]<298,998);10,99;IF(AND(RC[-11]>298,999;RC[-11]<478,3998);11,99;IF(AND(RC[-11]>479,3999;RC[-11]<597,998);12,99;IF(RC[-11]>597,999;13,99;0))))))))"
    Range("X2").Select
    Selection.AutoFill Destination:=Range("X2:X2371"), Type:=xlFillDefault
    Range("X2:X2371").Select
End Sub

[K2O2$]

Salut,

Ajoute une référence a une feuille devant tes range :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Worksheet("feuil1").Range("X2").Select
...

[klowba]

Ah zut, ça ne marche pas. Merci pour ta réponse K2O2$

[K2O2$]

Pardon...

c'est worksheets("feuil1.....

[klowba]

Pardon...

c'est worksheets("feuil1.....

Oui, j'avais remplacé par activesheet

[Invité]

Bonjour Klowba,

Avec la version 2000 il est indiqué que vous pouvez imbriquer jusqu'à 7 "SI" et il me semble bien que vous en avez 8.

[klowba]

Bonjour Klowba,

Avec la version 2000 il est indiqué que vous pouvez imbriquer jusqu'à 7 "SI" et il me semble bien que vous en avez 8.

ah zut, j'ai la v2003 ca doit etre le meme bin's

[Invité]

En effet, il me semble bien que l'on peut aller plus loin mais seulement à partir de la version 2007.

Il ne sert à rien de ressasser le passé, paraît-il, mais j'ai du mal à comprendre cette limitation alors que déjà en 1986 j'utilisais un intégré (sous Dos) et dans le tableur j'ai utilisé des formules comprenant au moins une quinzaine de "SI" imbriqués et peut-être plus avec si on le voulait la possibilité pour que ce soit plus clair, d'utiliser un éditeur de formule à partir duquel on pouvait mettre en forme un peu comme on le fait en VBA :

Si ........
sinon......
si....
sinonsi......
etc

de ce point de vue, Microsoft n'a pas fait très fort avec Excel.

[klowba]

En effet c'est vraiment pas pratique.

[Invité]

Bonjour Klowba,

Une question que j'aurais déjà dû vous poser :

-tenez-vous absolument à insérer la formule dans votre classeur ?

Car en VBA cette limitation n'existe pas et d'autre part on peut faire une boucle donc sans écrire un grand nombre de SI et dans ce cas enregistrer le résultat dans la cellule au lieu d'une formule.