Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel text box

text box

9 réponses
Avatar
JEAN
comment dire que mon text box doit prendre la valeur de A1 de la feuille 1

merci
Signaler un problème avec ce contenu

9 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Bruno LOUIS
Salut,

Essaie ça :
TextBox1 = Sheets("Feuil1").Range("A1")

Bruno

"JEAN" a écrit dans le message de news:

comment dire que mon text box doit prendre la valeur de A1 de la feuille 1

merci


Avatar
JEAN
Private Sub TextBox1_Change()
TextBox1.Value = Sheets("Feuil1").Range("E3")

End Sub
mais ca ne marche pas.
mon textbox est dans l'userform1

merci
"Bruno LOUIS" wrote:

Salut,

Essaie ça :
TextBox1 = Sheets("Feuil1").Range("A1")

Bruno

"JEAN" a écrit dans le message de news:

comment dire que mon text box doit prendre la valeur de A1 de la feuille 1

merci







Avatar
michdenis
Bonjour Jean,

Si ton code n'est pas dans le module du formulaire, tu dois insérer devant textbox1 le nom de ton formulaire

userform1.TextBox1.Value = Sheets("Feuil1").Range("E3")


Salutations!




"JEAN" a écrit dans le message de news:

Private Sub TextBox1_Change()
TextBox1.Value = Sheets("Feuil1").Range("E3")

End Sub
mais ca ne marche pas.
mon textbox est dans l'userform1

merci
"Bruno LOUIS" wrote:

Salut,

Essaie ça :
TextBox1 = Sheets("Feuil1").Range("A1")

Bruno

"JEAN" a écrit dans le message de news:

comment dire que mon text box doit prendre la valeur de A1 de la feuille 1

merci







Avatar
JEAN
re
j'ai bien mis ce code dans le module de mon formulaire

Private Sub TextBox1_Change()
UserForm4.TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
et quand j'ouvre mon userform4 la date qui est en A1 ne s'affiche pas dans
le textbox1??????

merci d e votre aide?

Bonjour Jean,

Si ton code n'est pas dans le module du formulaire, tu dois insérer devant textbox1 le nom de ton formulaire

userform1.TextBox1.Value = Sheets("Feuil1").Range("E3")


Salutations!




"JEAN" a écrit dans le message de news:

Private Sub TextBox1_Change()
TextBox1.Value = Sheets("Feuil1").Range("E3")

End Sub
mais ca ne marche pas.
mon textbox est dans l'userform1

merci
"Bruno LOUIS" wrote:

Salut,

Essaie ça :
TextBox1 = Sheets("Feuil1").Range("A1")

Bruno

"JEAN" a écrit dans le message de news:

comment dire que mon text box doit prendre la valeur de A1 de la feuille 1

merci












Avatar
michdenis
Bonjour Jean,

Ce n'est pas la ligne de code qui est problématique, mais l'événement que tu as choisi pour afficher tes données.


Si tu places la même ligne de code ici, tu devrais obtenir ce que tu veux.
'--------------
Private Sub UserForm_Initialize()

TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
'--------------


Salutations!



"JEAN" a écrit dans le message de news:

re
j'ai bien mis ce code dans le module de mon formulaire

Private Sub TextBox1_Change()
UserForm4.TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
et quand j'ouvre mon userform4 la date qui est en A1 ne s'affiche pas dans
le textbox1??????

merci d e votre aide?

Bonjour Jean,

Si ton code n'est pas dans le module du formulaire, tu dois insérer devant textbox1 le nom de ton formulaire

userform1.TextBox1.Value = Sheets("Feuil1").Range("E3")


Salutations!




"JEAN" a écrit dans le message de news:

Private Sub TextBox1_Change()
TextBox1.Value = Sheets("Feuil1").Range("E3")

End Sub
mais ca ne marche pas.
mon textbox est dans l'userform1

merci
"Bruno LOUIS" wrote:

Salut,

Essaie ça :
TextBox1 = Sheets("Feuil1").Range("A1")

Bruno

"JEAN" a écrit dans le message de news:

comment dire que mon text box doit prendre la valeur de A1 de la feuille 1

merci












Avatar
Bruno LOUIS
La procédure TextBox1_Change ne me semble pas très appropriée pour faire se
que tu souhaites.

Ta procédure ne se déclenchera que si l'utilisateur modifie le contenu de
textbox1.

Utilise plutôt la procédure suivante dans le code de la form USERFORM4 :

Private Sub UserForm_Activate()

Bon courage

Bruno

"JEAN" a écrit dans le message de news:


re
j'ai bien mis ce code dans le module de mon formulaire

Private Sub TextBox1_Change()
UserForm4.TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
et quand j'ouvre mon userform4 la date qui est en A1 ne s'affiche pas dans
le textbox1??????

merci d e votre aide?


Avatar
JEAN
merci


La procédure TextBox1_Change ne me semble pas très appropriée pour faire se
que tu souhaites.

Ta procédure ne se déclenchera que si l'utilisateur modifie le contenu de
textbox1.

Utilise plutôt la procédure suivante dans le code de la form USERFORM4 :

Private Sub UserForm_Activate()

Bon courage

Bruno

"JEAN" a écrit dans le message de news:


re
j'ai bien mis ce code dans le module de mon formulaire

Private Sub TextBox1_Change()
UserForm4.TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
et quand j'ouvre mon userform4 la date qui est en A1 ne s'affiche pas dans
le textbox1??????

merci d e votre aide?







Avatar
JEAN
merci beaucoup



Bonjour Jean,

Ce n'est pas la ligne de code qui est problématique, mais l'événement que tu as choisi pour afficher tes données.


Si tu places la même ligne de code ici, tu devrais obtenir ce que tu veux.
'--------------
Private Sub UserForm_Initialize()

TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
'--------------


Salutations!



"JEAN" a écrit dans le message de news:

re
j'ai bien mis ce code dans le module de mon formulaire

Private Sub TextBox1_Change()
UserForm4.TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
et quand j'ouvre mon userform4 la date qui est en A1 ne s'affiche pas dans
le textbox1??????

merci d e votre aide?

Bonjour Jean,

Si ton code n'est pas dans le module du formulaire, tu dois insérer devant textbox1 le nom de ton formulaire

userform1.TextBox1.Value = Sheets("Feuil1").Range("E3")


Salutations!




"JEAN" a écrit dans le message de news:

Private Sub TextBox1_Change()
TextBox1.Value = Sheets("Feuil1").Range("E3")

End Sub
mais ca ne marche pas.
mon textbox est dans l'userform1

merci
"Bruno LOUIS" wrote:

Salut,

Essaie ça :
TextBox1 = Sheets("Feuil1").Range("A1")

Bruno

"JEAN" a écrit dans le message de news:

comment dire que mon text box doit prendre la valeur de A1 de la feuille 1

merci

















Avatar
YannX
"JEAN" a écrit dans le message de
news:
merci beaucoup

Il a LU !


et meme dit
MERCIiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii
iiiiiiiiiii




Bonjour Jean,

Ce n'est pas la ligne de code qui est problématique, mais l'événement
que tu as choisi pour afficher tes données.




Si tu places la même ligne de code ici, tu devrais obtenir ce que tu
veux.


'--------------
Private Sub UserForm_Initialize()

TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
'--------------


Salutations!



"JEAN" a écrit dans le message de news:

re
j'ai bien mis ce code dans le module de mon formulaire

Private Sub TextBox1_Change()
UserForm4.TextBox1.Value = Sheets("feuil1").Range("A1")

End Sub
et quand j'ouvre mon userform4 la date qui est en A1 ne s'affiche pas
dans


le textbox1??????

merci d e votre aide?

Bonjour Jean,

Si ton code n'est pas dans le module du formulaire, tu dois insérer
devant textbox1 le nom de ton formulaire




userform1.TextBox1.Value = Sheets("Feuil1").Range("E3")


Salutations!




"JEAN" a écrit dans le message de
news:




Private Sub TextBox1_Change()
TextBox1.Value = Sheets("Feuil1").Range("E3")

End Sub
mais ca ne marche pas.
mon textbox est dans l'userform1

merci
"Bruno LOUIS" wrote:

Salut,

Essaie ça :
TextBox1 = Sheets("Feuil1").Range("A1")

Bruno

"JEAN" a écrit dans le message de
news:





comment dire que mon text box doit prendre la valeur de A1 de la
feuille 1






merci