Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Choix de saisie

Choix de saisie

5 réponses
Avatar
phg13
Bonjour,

Quand je 'reload' une fenetre j'aimerai que le curseur se place dans un
champs bien précis !
Comment faire

Merci
Signaler un problème avec ce contenu

5 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
Patrick
Salut,

voici ce que l'on peut ecrire:
Private Sub Form_Load()
NomDuChamp.SetFocus
End Sub

@+
Patrick
-----Message d'origine-----
Bonjour,

Quand je 'reload' une fenetre j'aimerai que le curseur se


place dans un
champs bien précis !
Comment faire

Merci


.



Avatar
phg13
Il me met APPEL DE FONCTION OU ARGUMENT INCORRECT
Private Sub Form_Load()

TXT_codenom.SetFocus
TXT_codenom.Text = ""
Txt_nom.Text = ""
Txt_prenom.Text = ""
Txt_sens.Text = ""

Cmd_entrer.Visible = "TRUE"
Cmd_sortir.Visible = "TRUE"
end sub




"Patrick" a écrit dans le message de
news:157801c38734$63afca60$
Salut,

voici ce que l'on peut ecrire:
Private Sub Form_Load()
NomDuChamp.SetFocus
End Sub

@+
Patrick
-----Message d'origine-----
Bonjour,

Quand je 'reload' une fenetre j'aimerai que le curseur se


place dans un
champs bien précis !
Comment faire

Merci


.



Avatar
Christian Hugoud - Xtrem7
Bien sûr : lors du load, la feuille n'est pas visible ; donc tu ne peux
pas mettre le focus sur un truc qui "n'existe pas" encore, vue de
l'interface graphique.

La solution :
a) soit tu mets le tabindex de ton ctrl = 0
b) soit tu gères le focus depuis l'évènement activate de la feuille.

Christian


"phg13" a écrit dans le message de
news:blc0fn$al7$
Il me met APPEL DE FONCTION OU ARGUMENT INCORRECT
Private Sub Form_Load()

TXT_codenom.SetFocus
TXT_codenom.Text = ""
Txt_nom.Text = ""
Txt_prenom.Text = ""
Txt_sens.Text = ""

Cmd_entrer.Visible = "TRUE"
Cmd_sortir.Visible = "TRUE"
end sub




"Patrick" a écrit dans le message de
news:157801c38734$63afca60$
Salut,

voici ce que l'on peut ecrire:
Private Sub Form_Load()
NomDuChamp.SetFocus
End Sub

@+
Patrick
>-----Message d'origine-----
> Bonjour,
>
>Quand je 'reload' une fenetre j'aimerai que le curseur se
place dans un
>champs bien précis !
>Comment faire
>
>Merci
>
>
>.
>




Avatar
Cyril Marchal
C'est normal, lorsqu'on emploie la méthode .setfocus dans une procédure de
chargement de feuille, un erreur est renvoyée. Pour rester dans le simple,
il vous reste deux solutions :
- utiliser la propriété "tabindex" du contrôle auquel tu veux donner le
focus et lui donner la valeur 0.
- utilliser la méthode .setfocus depuis la procédure événementielle
"Form_Activate" de votre feuille.

En espérant vous avoir aidé.

Cyril Marchal.

"Patrick" a écrit dans le message news:
157801c38734$63afca60$
Salut,

voici ce que l'on peut ecrire:
Private Sub Form_Load()
NomDuChamp.SetFocus
End Sub

@+
Patrick
-----Message d'origine-----
Bonjour,

Quand je 'reload' une fenetre j'aimerai que le curseur se


place dans un
champs bien précis !
Comment faire

Merci


.



Avatar
Jérôme Prioux
Avant ton instruction SetFocus, mets la propriété Visible de la Form à True.

Me.Visible = True
TXT_codenom.Setfocus


"phg13" a écrit dans le message de news:
blc0fn$al7$
Il me met APPEL DE FONCTION OU ARGUMENT INCORRECT
Private Sub Form_Load()

TXT_codenom.SetFocus
TXT_codenom.Text = ""
Txt_nom.Text = ""
Txt_prenom.Text = ""
Txt_sens.Text = ""

Cmd_entrer.Visible = "TRUE"
Cmd_sortir.Visible = "TRUE"
end sub




"Patrick" a écrit dans le message de
news:157801c38734$63afca60$
Salut,

voici ce que l'on peut ecrire:
Private Sub Form_Load()
NomDuChamp.SetFocus
End Sub

@+
Patrick
>-----Message d'origine-----
> Bonjour,
>
>Quand je 'reload' une fenetre j'aimerai que le curseur se
place dans un
>champs bien précis !
>Comment faire
>
>Merci
>
>
>.
>