XL 2019 Erreur dans formule R1C1

  • Initiateur de la discussion Initiateur de la discussion netparty
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

netparty

XLDnaute Occasionnel
Bonjour à tous

j'essaie de convertir une formule au format R1C1 mais j'ai l'erreur 1004 quand je lance la macro.

La formule original :
=SI(ET($J2="SLA06";$K2="NON CRITIQUE";($AE2*24)>BONUS!$E$8);(ENT($AE2*24)-BONUS!$E$8)*BONUS!$C$8;SI(ET($J2="SLA06";$K2="CRITIQUE";($AE2*24)>BONUS!$J$8);(ENT($AE2*24)-BONUS!$J$8)*BONUS!$H$8;""))

et la R1C1 :
Range("O" & i).FormulaR1C1 = "=IF(AND(RC10=""SLA06"",RC11=""NON CRITIQUE"",(RC31*24)>BONUS!$E$8),(ENT(RC31*24)-BONUS!$E$8)*BONUS!$C$8,SI(ET(RC10=""SLA06"",RC11=""CRITIQUE"",(RC31*24)>BONUS!$J$8),(ENT(RC31*24)-BONUS!$J$8)*BONUS!$H$8,""""))"

Si quelqu'un voit l'erreur car moi je ne la trouve pas

Merci d'avance

Bonne journée
 
Solution
Bonjour.
VB:
.FormulaR1C1 = "=IF(AND(R[1]C10=""SLA06"",R[1]C11=""NON CRITIQUE"",(R[1]C31*24)>BONUS!R8C5),(INT(R[1]C31*24)-BONUS!R8C5)*BONUS!R8C3,IF(AND(R[1]C10=""SLA06"",R[1]C11=""CRITIQUE"",(R[1]C31*24)>BONUS!R8C10),(INT(R[1]C31*24)-BONUS!R8C10)*BONUS!R8C8,""""))"
Vu SI(ET( quelque part au lieu de IF(AND(
Bonjour.
VB:
.FormulaR1C1 = "=IF(AND(R[1]C10=""SLA06"",R[1]C11=""NON CRITIQUE"",(R[1]C31*24)>BONUS!R8C5),(INT(R[1]C31*24)-BONUS!R8C5)*BONUS!R8C3,IF(AND(R[1]C10=""SLA06"",R[1]C11=""CRITIQUE"",(R[1]C31*24)>BONUS!R8C10),(INT(R[1]C31*24)-BONUS!R8C10)*BONUS!R8C8,""""))"
Vu SI(ET( quelque part au lieu de IF(AND(
 
Bonjour Netparty, Dranreb,
Ou alors conserver la notation "française" avec :
VB:
Range("O" & i).FormulaLocal = _
   "=SI(ET($J2=""SLA06"";$K2=""NON CRITIQUE"";($AE2*24)>BONUS!$E$8);(ENT($AE2*24)-BONUS!$E$8)*BONUS!$C$8;SI(ET($J2=""SLA06"";$K2=""CRITIQUE"";($AE2*24)>BONUS!$J$8);(ENT($AE2*24)-BONUS!$J$8)*BONUS!$H$8;""""))"
Ce qui peut être plus simple à la compréhension si le fichier n'est pas appelé à être utilisé sur un PC en anglais.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
8
Affichages
841
Réponses
1
Affichages
1 K
Retour