OVH Cloud OVH Cloud

Formule Dcount en vba

3 réponses
Avatar
Dominique MARTIN
Bonjour,

En vba, j'ai une formule de calcul stockée dans la variable string strFormule.
Cette formule est une formule simple de regroupement avec DCount(....).
je souhaite récupérer dans la variable Resultat le calcul de ma formule.
Si j'écris Resultat=strFormule, il met dans la variable Resultat la formule
et non le calcul.
comment faire pour avoir le résultat du calcul ?

Merci beaucoup pour votre aide
Dominique

3 réponses

Avatar
Eric
Bonjour Dominique

avec la fonction Eval()
exemple:

Sub toto()
Dim strFormule As String
strFormule = "Dcount('*','tsalarie')"
MsgBox Eval(strFormule)
End Sub

dans ton cas, Resultat=Eval(strFormule)

A+
Eric

Bonjour,

En vba, j'ai une formule de calcul stockée dans la variable string strFormule.
Cette formule est une formule simple de regroupement avec DCount(....).
je souhaite récupérer dans la variable Resultat le calcul de ma formule.
Si j'écris Resultat=strFormule, il met dans la variable Resultat la formule
et non le calcul.
comment faire pour avoir le résultat du calcul ?

Merci beaucoup pour votre aide
Dominique



Avatar
Maxence HUBICHE
Hello Dominique,


essaye plutôt de faire :
Resultat=Eval(strFormule)

;)


================== Maxence HUBICHE

MVP Access
Revendeur CaseStudio (http://www.casestudio.fr)
Responsable Access sur http://www.developpez.com
La plus grosse FAQ Access du Web : http://access.developpez.com/faq

Bonjour,

En vba, j'ai une formule de calcul stockée dans la variable string
strFormule.
Cette formule est une formule simple de regroupement avec
DCount(....).
je souhaite récupérer dans la variable Resultat le calcul de ma
formule.
Si j'écris Resultat=strFormule, il met dans la variable Resultat la
formule
et non le calcul.
comment faire pour avoir le résultat du calcul ?
Merci beaucoup pour votre aide
Dominiqu


Avatar
Dominique MARTIN
Bonjour,

Merci beaucoup, je ne connaissais pas cette fonction.

Dominique


Bonjour Dominique

avec la fonction Eval()
exemple:

Sub toto()
Dim strFormule As String
strFormule = "Dcount('*','tsalarie')"
MsgBox Eval(strFormule)
End Sub

dans ton cas, Resultat=Eval(strFormule)

A+
Eric

Bonjour,

En vba, j'ai une formule de calcul stockée dans la variable string strFormule.
Cette formule est une formule simple de regroupement avec DCount(....).
je souhaite récupérer dans la variable Resultat le calcul de ma formule.
Si j'écris Resultat=strFormule, il met dans la variable Resultat la formule
et non le calcul.
comment faire pour avoir le résultat du calcul ?

Merci beaucoup pour votre aide
Dominique