Excel > Range(..).FormulaR1C1 > Prob de quote

Résolu/Fermé
locas - 6 nov. 2011 à 19:36
 locas - 6 nov. 2011 à 23:10
Bonjour,

J'ai un petit soucis avec une macro & vba sous excel :
.
En utilisant la commande "FormulaR1C1" : La formule insérée est construite dynamiquement à partir d'une coordonnée de cellule obtenue en concaténant le nom de la colonne ( une lettre stockée en constante ) et la ligne en cours.
.
Voici une partie du code :

....
Const COL_TIME_DIFF As String = "U"
...
...
Range(COL_WARNING & CRow).FormulaR1C1 = "=SI(" & COL_TIME_DIFF & CRow & "<0,""!"","""")"
...
...


La fonction ne déclenche pas d'erreur et insère la valeur suivante dans la cellule :


=SI('U14'<0;"!";"")


Bien évidemment, cela ne marche pas car il ajoute 2 simple quote entre les coordonnées de la cellule U14. En supprimant ces 2 quotes, la formule fonctionne parfaitement.
.
Comment puis-je éviter l'ajout de ces quotes ?
.
Merci par avance de vos retours.
.
Cordialement



A voir également:

2 réponses

ccm81 Messages postés 10907 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 janvier 2025 2 430
6 nov. 2011 à 21:42
bonsoir

et comme ça ?

Range(COL_WARNING & cRow).Formula = "=IF(" & COL_TIME_DIFF & cRow & "<0,""!"","""")"

bonne suite
0
Ca marche :)

Merci beaucoup pour ta réponse :)
0