OVH Cloud OVH Cloud

valeur dans controle

4 réponses
Avatar
GuyM
Bonjour à tous,
Insérer dans une cellule le contenu d'un TextBox est aisé: [A1] = UserForm1.TextBox1

Et le contraire, peut-il se faire: transférer une valeur d'une cellule dans un contrôle TextBox ?


Guy

4 réponses

Avatar
Pierre Fauconnier
UserForm1.TextBox1=[A1]

Simple... le genre de truc que l'on peut tester soi-même ... ;-))


Pierre

"GuyM" a écrit dans le message de
news:41a5e436$0$28525$
Bonjour à tous,
Insérer dans une cellule le contenu d'un TextBox est aisé: [A1] UserForm1.TextBox1

Et le contraire, peut-il se faire: transférer une valeur d'une cellule
dans un contrôle TextBox ?



Guy



Avatar
GuyM
merci Pierre mais j'avais évidemment essayé.

Peux-être pourrais tu accorder quelques instants à cet extrait de procédure et me dire si quelque chose cloche : je n'arrive pas à
afficher dans le textbox 1 ce qu'il y a dans la cellule A5 de la feuille ?

UserForm1.Show

With Worksheets(feuil1)
Userform1.TextBox1= .Cells(5, 1)
End With
...
...
...

UserForm1.Hide

Merci pour ta patience. Guy.
Avatar
Pierre Fauconnier
Attribue d'abord la valeur au textbox
userform1.textBox1=worksheets("feuil1").cells(5,1)
userform1.show

Attention, dans le code que tu as transmis, il n'y a pas de " qui entourent
Feuil1... Cela doit normalement poser un problème...

Pierre

"GuyM" a écrit dans le message de
news:41a5e984$0$30327$
merci Pierre mais j'avais évidemment essayé.

Peux-être pourrais tu accorder quelques instants à cet extrait de
procédure et me dire si quelque chose cloche : je n'arrive pas à

afficher dans le textbox 1 ce qu'il y a dans la cellule A5 de la feuille ?

UserForm1.Show

With Worksheets(feuil1)
Userform1.TextBox1= .Cells(5, 1)
End With
...
...
...

UserForm1.Hide

Merci pour ta patience. Guy.



Avatar
GuyM
Merci Pierre, ça fonctionne.
mon erreur vient du fait qu'il faut d'abord attribuer les valeurs aux contrôles et faire ensuite UserForm.Show

Merci encore. Guy.