Formule dans TextBox

Modeste geedee

XLDnaute Barbatruc

• 18 Mars 2012

• #2

Re : Formule dans TextBox

Bonsour®

sourire...
si le résultat est déjà dans une cellule, il suffit de nommer cette cellule
par ex : Observations

puis dans ton code VBA :

Code:

TextBox1.Value =Range("Observations")

 

Vote positif 0 Vote négatif

V

volcom2689

Guest

• 18 Mars 2012

• #3

Re : Formule dans TextBox

Le résultat n'est pas dans une cellule justement....

 

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 19 Mars 2012

• #4

Re : Formule dans TextBox

Bonsour®

volcom2689 à dit:

Le résultat n'est pas dans une cellule justement....

Cliquez pour agrandir...

Sourire...

Code:

Textbox1.Value= Evaluate("(SUM(IF(ISBLANK(Oiseaux!F1663:Oiseaux!F2777),""0"",1/COUNTIF(Oiseaux!F1663:Oiseaux!F2777,Oiseaux!F1663:Oiseaux!F2777))))")

 

Vote positif 0 Vote négatif

V

volcom2689

Guest

• 19 Mars 2012

• #5

Re : Formule dans TextBox

Bonjour,

La formule marche à merveille mais le résultat apparaît dans la TextBox uniquement quand je clique dans celle-ci et appuie sur n'importe qu'elle touche de mon clavier (étrange ?). Quelle fonction modifier pour que le résultat s'affiche automatiquement à l'ouverture du UserForm ?

Merci de ton aide en tout cas !

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 19 Mars 2012

• #6

Re : Formule dans TextBox

Bonjour,

peut être placer cette instruction dans l'événement "initialize" de l'userform.

bonne journée
@+

 

Vote positif 0 Vote négatif

V

volcom2689

Guest

• 19 Mars 2012

• #7

Re : Formule dans TextBox

Bonjour Pierrot93,

Je suis assez novice en VBA. Peux-tu être plus précis stp car je ne trouve pas...

Merci

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 19 Mars 2012

• #8

Re : Formule dans TextBox

Re,

dans le module de l'usf :

Code:

Private Sub UserForm_Initialize()
'ton code
End Sub

 

Vote positif 0 Vote négatif

V

volcom2689

Guest

• 19 Mars 2012

• #9

Re : Formule dans TextBox

Merci beaucoup Pierrot93 ! Ca marche nickel !

 

Vote positif 0 Vote négatif