Utilisation d'un string à intégrer dans une expression

[elgringo123456]

Bonjour,

Encore désolé de vous importuner mais je suis devant la problématique suivante :

J'ai une variable string Toto contenant : "Range("A1") + i"
Je souhaiterais évaluer une expression en vba :

ValeurSomme = ValeurSomme + Toto

Je cherche donc à convertir un string pour l'intégrer dans une expression.
J'ai essayé evaluate, retirer le " au début et à la fin ce n'est pas bon.
J'ai cherché sur Internet et au finale je n'ai plus d'idée.

J'ai inséré un fichier pour exemple.

Pourriez-vous m'aider ?
Merci d'avance,
Cordialement.
Elgringo123456

 

[pierrejean]

Re : Utilisation d'un string à intégrer dans une expression

bonjour elgringo

Voila comment j'aurais traité le probleme:

Function sommespe(cellule As Range, i0 As Integer, i1 As Integer)
For n = i0 To i1
  tot = tot + cellule.Value + n
Next n
sommespe = tot
End Function
Sub test()
MsgBox (sommespe(Range("A1"), 1, 5))
End Sub

 

[elgringo123456]

Re : Utilisation d'un string à intégrer dans une expression

Bonjour PierreJean,

Tout d'abord merci beaucoup de ta réponse. En effet, par ce biais la formule mathématique est intégrée dans le code vba.

Par contre saurais-tu comment sortir la formule mathématique et l'intégrer en paramètre d'entrée de la fonction ?

Cordialement.
Elgringo123456

 

[pierrejean]

Re : Utilisation d'un string à intégrer dans une expression

Re

Uniquement pour le fun
parceque l'usage en sera necessairement tres limité

 

[elgringo123456]

Re : Utilisation d'un string à intégrer dans une expression

Bonjour PierreJean,

Je suis carrément impressionné. Es-tu un des maîtres absolues sur Excel.
Dans tous les cas => BRAVO !!!!!!!!!


Merci beaucoup de la réponse.
Cordialement.
Elgringo123456