Discussion :

[dafchap]

Bonjour,

mon problème se situe ici (erreur d'exécution 1004: erreur définie par l'application ou par l'objet) :

Code :

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

Cells(2, 3).Formula = "=" & Cells(2, 4) & "*" & Cells(9, 1)

Cette valeur est bien inscrite dans la case correspondante et est de 0,000555428932197716 (elle est issue de cette ligne : Cells(9, 1).Formula = Application.LinEst(Q, Canaux)(1))

Quand je remplace directement dans la formule Cells(9,1) par un entier ça marche. Quand je remplace Cells(9,1) par le nombre initial, mais avec un point ça marche aussi. Du coup j'ai écris ceci et ma formule fonctionne :

Code :

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

Cells(2, 3).Formula = "=" & Cells(2, 4) & "*" & Replace(Cells(9, 1), ",", ".")

Mais n'y a t-il pas un moyen plus général de faire en sorte que les nombres avec des virgules soient pris en compte dans les formules sans devoir utiliser à chaque fois Replace() ?

David

[Marc-L]

Bonjour, bonjour !

Franchement via le B-A-BA d'Excel en utilisant les adresses des cellules : Cells(2, 3).Formula = "=D2*A9" …

Voilà, voilà !

______________________________________________________________________________________________________

Je suis Paris, Charlie, Bruxelles, …

[dafchap]

Merci pour cette réponse simple et efficace !

David