Discussion :

[smedini]

Bonjour,

Je dispose une variable de type Double et je souhaite mettre sa valeur dans une formule du genre "=0,1215515+23+K6" pour aller dans une cellule.

Code :

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

1
2
3
4
5
6
 
Function test()
    Dim doub As Double
    ert = 1.11111122222222E-08
    Me.Range("A1").Value = "=" & ert
End Function

Le code suivant me renvoie:
erreur execution '1004': erreur définie par l'application ou par l'objet

Ou est le souci?

Merci,

a bientôt

si je mets une valeur entière ça fonctionne, mais j'ai justement besoin de décimaux

[alsimbad]

j'ai essayé sans le me, et ça fonctionne.

Code :

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

1
2
3
4
5
Function test()
    Dim doub As Double
    ert = 1.11111122222222E-08
Range("A1").Value = "=" & ert
End Function

et PS : ce n'est pas une fonction, puisque elle ne renvoie pas de valeur, a moins que ce ne soit qu'une partie simplifiée pour l'exemple ?
[code]

[smedini]

oui le me ne sert à rien, mais même sans, cela ne fonctionne pas chez moi.
as -tu testé avec un chiffre à virgule?

Chez moi cela fonctionne quand je fait

Code :

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

1
2
3
4
5
6
 
Function test()
Dim doub As Double
ert = 1.11111122222222E-08
Range("A1").Value = "=" & replace(ert,",",".")
End Function

[jfontaine]

Essai plutot comme ca

Code :

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

Range("A1").Value =   ert

le signe = devant c'est si tu veux que ce soit une formule et dans ce cas c'est

Code :

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

Range("A1").Formula= "=" & ert

[alsimbad]

je n'avais pas compris que c'était une histoire de virgule et de point. dans ce cas c'est peut etre tout simplement qu'il faut changer tes parametres dans le panneau de configuration, option régionales et linguistiques

[zazaraignée]

Ce n'est pas une question de point ou de virgule dans ce cas ci.

Si c'est une formule que tu veux mettre dans ta cellule, alors utiliser la propriété Formula plutôt que Value comme te l'a dit jfontaine un peu plus tôt.