NHenry
Messages postés15102Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention27 mars 2024159 24 févr. 2011 à 14:00
Bonjour,
"Il plante", il mouline dans le vide ou il t'affiches un message d'erreur ?
Dans le premier cas, il faut voir le contenu de tabencours
sans le 2ième, le message serait bien utile pour t'aider.
NHenry
Messages postés15102Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention27 mars 2024159 24 févr. 2011 à 14:25
Bonjour,
Il ne plante pas, il t'affiche un message d'erreur.
2 causes possibles :
ActiveCell.FormulaR1C1 est invalide (en tant qu'opérande)
tabencours(colonne) te retourne l'erreur
Serait-il possible que tu re'gardes les 2 valeurs en mettant un point d'arrêt que la ligne en question ?
NHenry
Messages postés15102Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention27 mars 2024159 24 févr. 2011 à 14:40
Bonjour,
ActiveCell.FormulaR1C1 a cette valeur avant déclenchement de l'erreur ?
d'autre part :
Cells(33, colonne + 3).Select
ActiveCell.FormulaR1C1 = "=" & "((" & tabencours(colonne) & "*0.05)-1)/12"
Peut être code plus efficacement comme ça :
Cells(33, colonne + 3).FormulaR1C1 = "=" & "((" & tabencours(colonne) & "*0.05)-1)/12"
De quel type est "tabencours" ?
à quelle "colonne", ça te génère l'erreur ?
As-tu vérifier (au moment de l'erreur) la valeur de :
- colonne
- tabencours(colonne)
- Cells(33, colonne + 3).FormulaR1C1
La formule semble correcte, donc ça doit venir des éléments variables.