OVH Cloud OVH Cloud

formule dans zone de texte?

7 réponses
Avatar
Alex
Bonjour,

Voila j'ai une zone de texte dans un formulaire
Je voudrais que celle ci puisse accepeter les formules de calcul du type
=12+14 et donne directement le resultat dans la zone de texte.
Est ce possible et comment?

MErci d'avance

7 réponses

Avatar
Eric
Bonjour,

Pas sur d'avoir bien compris la question.
Avec la fonction Eval() - voir l'aide.

Soit un formulaire avec 3 zones de texte Texte0, Texte1, Texte2 et un
bouton de commande. Texte0 contient 12, Texte1 14

Private Sub Commande0_Click()
Dim chaine As String
chaine = Texte0 & "+" & Texte1
Me.Texte2 = Eval(chaine)
End Sub

Bonjour,

Voila j'ai une zone de texte dans un formulaire
Je voudrais que celle ci puisse accepeter les formules de calcul du type
+14 et donne directement le resultat dans la zone de texte.
Est ce possible et comment?

MErci d'avance




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Alex
Bonjour,

En fait, je voudrais ne pas utiliser plusieurs zonne de texte
Je voudrais simplement q'en entrant 12+4 dasn la zone il me mette
directement le resultat?
En espérant avoir été plus clair
Est ce possible?

Merci



Bonjour,

Pas sur d'avoir bien compris la question.
Avec la fonction Eval() - voir l'aide.

Soit un formulaire avec 3 zones de texte Texte0, Texte1, Texte2 et un
bouton de commande. Texte0 contient 12, Texte1 14

Private Sub Commande0_Click()
Dim chaine As String
chaine = Texte0 & "+" & Texte1
Me.Texte2 = Eval(chaine)
End Sub

Bonjour,

Voila j'ai une zone de texte dans un formulaire
Je voudrais que celle ci puisse accepeter les formules de calcul du type
+14 et donne directement le resultat dans la zone de texte.
Est ce possible et comment?

MErci d'avance




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr




Avatar
3stone
Salut,

"Alex"
| En fait, je voudrais ne pas utiliser plusieurs zonne de texte
| Je voudrais simplement q'en entrant 12+4 dasn la zone il me mette
| directement le resultat?


Sur après mise à jour...

ZoneDeTexte = Eval(ZoneDeTexte)


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Eric
re,

Sur après mise à jour de la zone de texte:
Private Sub Texte0_AfterUpdate()
Me.Texte0 = Eval(Me.Texte0)
EndSub
Retournera 16 si tu as saisi 12+4 dans Texte0

Bonjour,

En fait, je voudrais ne pas utiliser plusieurs zonne de texte
Je voudrais simplement q'en entrant 12+4 dasn la zone il me mette
directement le resultat?
En espérant avoir été plus clair
Est ce possible?

Merci




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Eric
Bonjour Pierre,

Désolé pour le doublon, je n'avais pas fait de MAJ avant ma réponse

Salut,

"Alex"
| En fait, je voudrais ne pas utiliser plusieurs zonne de texte
| Je voudrais simplement q'en entrant 12+4 dasn la zone il me mette
| directement le resultat?


Sur après mise à jour...

ZoneDeTexte = Eval(ZoneDeTexte)




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
3stone
Salut Eric,

"Eric"
| Désolé pour le doublon, je n'avais pas fait de MAJ avant ma réponse


C'est plutôt mon erreur, je n'avais pas remarqué que tu restais au balon...


PS: Et continue, moi je m'en vais regarder tu tennis ;-))

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Alex
re ok ok et merci
Mais le pb c'st que ma zone de texte est relié a une table qui est défini en
numerique
y a til une parade pour éviter qu'il prenne toute suis en compte que ce soit
du texte ?

Merci d'avance




re,

Sur après mise à jour de la zone de texte:
Private Sub Texte0_AfterUpdate()
Me.Texte0 = Eval(Me.Texte0)
EndSub
Retournera 16 si tu as saisi 12+4 dans Texte0

Bonjour,

En fait, je voudrais ne pas utiliser plusieurs zonne de texte
Je voudrais simplement q'en entrant 12+4 dasn la zone il me mette
directement le resultat?
En espérant avoir été plus clair
Est ce possible?

Merci




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr