Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Visionneuse textbox

Y

Yvon

Guest
Bonsoir à tous,

Une tite question dans useform, 2 textbox une qui écrit l'autre qui lit, pourquoi la lecture n'est pas immédiate alors que l'écriture l'est?

Je vous livre le code:

Private Sub TextBox1_Change()
Sheets('feuil1').Range('a1').Value = TextBox1
End Sub

Private Sub UserForm_Initialize()
TextBox2.Value = Sheets(1).Range('a1').Value
End Sub

Private Sub TextBox2_Change()

End Sub

Private Sub UserForm_Click()

End Sub

Par avance merci
Yvon
 

deudecos

XLDnaute Impliqué
Bonjour Yvon, le forum,

Ta TextBox qui lit, est renseignee au moment de l'initialisation de ton UserForm, raison pour laquelle ca ne fonctionne pas en meme temps que celle qui ecris... Puisque avant de modifier celle qui lit, tu dois unloader et reloader ton userform...
Je pense donc que le bout de code qui est dans
Private Sub UserForm_Initialize()
Tu devrais le positionner dans

Private Sub TextBox2_Change()
TextBox2.Value = Sheets(1).Range('a1').Value
End Sub

Et en principe (mais je n'ai pas verifie), ca doit fonctionner en meme temps que l'autre TextBox.

Bonne journee

Olivier

Petite rectification, ca n'est pas dans Private sub TextBox2, mais dans Private Sub Textbox1 que tu dois recopier ton code. En fait le meme module que pour ta TextBox qui ecris.

Message édité par: Deudecos, à: 28/10/2005 05:04
 
D

daniel

Guest
hello le forum

tout simplement :

Private Sub TextBox1_Change()
Sheets('feuil1').Range('a1').Value = TextBox1
TextBox2.Value = Sheets(1).Range('a1').Value
End Sub


Bon week end

Daniel
 

Discussions similaires

Réponses
6
Affichages
333
Réponses
16
Affichages
614
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…