XL 2013 formulaR1C1 et nombre

[pascal_bidouille]

Hello,

j'ai un problème avec la macro suivante :

Sub test2()
Dim perc As Double
    perc = 0.06
    ActiveCell.FormulaR1C1 = "=R4C * " & perc
End Sub

J'observe que cela essaie de mettre dans la formule "=R4C * 0,06" au lieu de "=R4C * 0.06"
Du coup erreur d’exécution !

J'ai essayé d'utiliser cstr(perc) mais cela donne le même résultat.
Visiblement en passant le nombre en texte, celui-ci est mis au format français.
Comment éviter cela ?

Bien entendu je ne peux pas au final juste saisir le texte "0.06" car dans ma vraie macro la valeur est calculée.
Merci d'avance.

 

[Pierrot93]

Re : formulaR1C1 et nombre

Bonjour,

un ceode comme celui ci fonctionne chez moi...

Dim perc As Double
perc = 0.06
ActiveCell.FormulaR1C1 = "=R[4]C*" & perc

bonne journée
@+

 

[Pierrot93]

Re : formulaR1C1 et nombre

Re,

sinon essaye aussi ceci :

Dim perc As Double
perc = 0.06
ActiveCell.FormulaR1C1 = "=R[4]C*" & Val(perc)

 

[Dranreb]

Re : formulaR1C1 et nombre

Bonsoir
Plutôt:

ActiveCell.FormulaR1C1 = "=R4C*" & Trim$(Str$(perc))