Pb entre SetFocus et AfterUpdate

G

Guest

Guest

• 8 Janvier 2009

• #2

Re : Pb entre SetFocus et AfterUpdate

Bonjour Mécano,

Rajoute:

Code:

Private Sub Dia_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Cancel = Not Valide
End Sub

Et tu remet Valide=True sur l'évènement Enter de chaque Textbox

Deuxième solution, utiliser l'évènement Exit des textbox pour les valider

A+

 

Dernière modification par un modérateur: 8 Janvier 2009

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 8 Janvier 2009

• #3

Re : Pb entre SetFocus et AfterUpdate

Bonjour Hasco et merci pour ta réponse.

Je viens d'essayer ta solution mais :

- que je mette le Dia_Exit(...) en plus (avec ou sans le SetFocus dedans)
- que je remplace AfterUpdate par Dia_Exit(...) dans ma routine actuelle

ne change malheureusement rien ; je n'ai toujours pas le curseur dans la TextBox ...

Merci tout de même

Cordialement

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 8 Janvier 2009

• #4

Re : Pb entre SetFocus et AfterUpdate

Re,

Et avec ceci:

Code:

Private Sub Dia_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    Dia.SelStart = 0
    Dia.SelLength = Len(Dia)
    Cancel = Not Valide
End Sub

Pour sélectionner le texte de dia

Ou cela:

Code:

Private Sub Dia_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    Dia.SelStart = Len(Dia)
    Cancel = Not Valide
End Sub

Pour mettre le curseur en fin de text de Dia.

A+

 

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 8 Janvier 2009

• #5

Re : Pb entre SetFocus et AfterUpdate

Bonjour mécano41,
Hasco 🙂,

il faut également démarrer l'usf en modal (enlève le "0"):
Private Sub CommandButton1_Click()
BdDlg1.Show (0)
End Sub

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 8 Janvier 2009

• #6

Re : Pb entre SetFocus et AfterUpdate

RE,

Je vais en faire râler certains, mais je ne résiste pas à la tentation de saluer l'honorable Skoobi😀

A++

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 8 Janvier 2009

• #7

Re : Pb entre SetFocus et AfterUpdate

Les deux fonctionnent, à condition effectivement de mettre l'USF en modal.

Merci à tous et bonne journée.

cordialement

 

Vote positif 0 Vote négatif