Sélection textbox d'un userform

Pierrot93

XLDnaute Barbatruc

• 19 Janvier 2014

• #2

Re : Sélection textbox d'un userform

Bonjour,

Quand j'ouvre un userform avec "UserForm1.Show 0", j'aurais besoin que la textbox de l'userform reste sélectionnée, mais des que j'utilise des boutons en dehors de l'userform, elle se désélectionne

Cliquez pour agrandir...

pas sur d'avoir tout compris, mais supprime peut être le 0 :

Code:

UserForm1.Show

bon après midi
@+

 

Vote positif 0 Vote négatif

D

David590

XLDnaute Occasionnel

• 19 Janvier 2014

• #3

Re : Sélection textbox d'un userform

Bonjour Pierrot,

Effectivement, si j’enlève le 0, la textbox reste sélectionnée, mais je ne peux plus utiliser les boutons de la feuille
Je pense à un code à mettre dans les boutons de la feuille qui renvoi sur la textbox de l'userform
J'ai essayé UserForm1.textbox1.SetFocus mais ça ne fonctionne pas

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 19 Janvier 2014

• #4

Re : Sélection textbox d'un userform

Re,

essaye avec ceci dans le code de tes boutons :

Code:

AppActivate ("UserForm1")

 

Vote positif 0 Vote négatif

D

David590

XLDnaute Occasionnel

• 19 Janvier 2014

• #5

Re : Sélection textbox d'un userform

ça réactive bien l'userform mais pas la textbox

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 19 Janvier 2014

• #6

Re : Sélection textbox d'un userform

Re,

pour le vérifier, dans le code de ton bouton :

Code:

AppActivate ("UserForm1")
UserForm1.TextBox1.SetFocus
MsgBox UserForm1.ActiveControl.Name

 

Vote positif 0 Vote négatif

D

David590

XLDnaute Occasionnel

• 19 Janvier 2014

• #7

Re : Sélection textbox d'un userform

Avec ton code il me dit bien que textbox1 est active, mais le curseur n'est pas dessus et je ne peux donc pas saisir directement, j'ai fait un fichier pour que tu vois mieux le problème

 

Pièces jointes

• Test Userform.xls

  45 KB · Affichages: 30
• Test Userform.xls

  45 KB · Affichages: 28
• Test Userform.xls

  45 KB · Affichages: 30

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 19 Janvier 2014

• #8

Re : Sélection textbox d'un userform

Re,

pas d'autre idée pour le moment...

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 19 Janvier 2014

• #9

Re : Sélection textbox d'un userform

Re,

peut être en donnant au préalable le focu à un autre contrôle...

Code:

AppActivate ("UserForm1")
UserForm1.TextBox2.SetFocus
UserForm1.TextBox1.SetFocus

 

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 19 Janvier 2014

• #10

Re : Sélection textbox d'un userform

bonjour David590,l'ami Pierrot 🙂🙂🙂

on pourrait tenter

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
  Unload UserForm1: UserForm1.Show 0
End Sub

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 19 Janvier 2014

• #11

Re : Sélection textbox d'un userform

Re, bonjour Laetitia🙂 aarf bien vu....

 

Vote positif 0 Vote négatif

D

David590

XLDnaute Occasionnel

• 19 Janvier 2014

• #12

Re : Sélection textbox d'un userform

Bonjour Laetitia,

C'est tout simple et ça marche parfaitement

Merci à vous deux
@+

 

Vote positif 0 Vote négatif