FormulaireTextBox
Le contrôle zone de texte
Sélectionner du texte
• Pour sélectionner du texte dans une textbox
Txtbox.SelStart= premier_caractère
Txtbox.SeLength=longueur_de_la_sélection
Txtbox.SeLength=longueur_de_la_sélection
• Exemple sur un champ texte nommé txt_annee :
txt_annee.SetFocus
txt_annee.SelStart = 0
txt_annee.SelLength = Len(txt_annee.Text)
txt_annee.SelStart = 0
txt_annee.SelLength = Len(txt_annee.Text)
Remarque :
Mettre la propriété HideSelection sur True pour voir la sélection lorsque la textbox n'est pas en focus.
Donner le focus
• Donner le focus sur un champ texte
txt_nom.SetFocus
Supprimer le texte
• Vider un champ de texte
txt_nom.Value = ""
Valeur par défaut
txt_nom.Text = "Easy-Micro"
Convertir une zone de texte en nombre
• Pour que le chiffre saisie dans une zone de texte de formulaire ne soit pas interprété comme du texte par Excel, on utilise la fonction CInt (Convert INTeger)Voir toute les fonctions de conversion VBA
int_numcommande = CInt(txt_numero_de_commande)
Sheets(1).Range("A" & int_numligne).Value = CInt(frm_nouvelle_commande.txt_numero_de_commande)
Incrémenter une zone de texte
• A saisir dans une procédure événementielle de type UserForm_Activate
Private Sub UserForm_Activate()
' Incrémentation automatique d'un champ de formulaire.
' Ici, c'est le numéro de commande qui est incrémenté
Static int_numcommande As Integer ' Variable Static
txt_numero_de_commande.Value = int_numcommande
int_numcommande = CInt(txt_numero_de_commande) 'CInt = Convert Integer
int_numcommande = int_numcommande + 1
txt_numero_de_commande.Value = int_numcommande
End Sub
' Incrémentation automatique d'un champ de formulaire.
' Ici, c'est le numéro de commande qui est incrémenté
Static int_numcommande As Integer ' Variable Static
txt_numero_de_commande.Value = int_numcommande
int_numcommande = CInt(txt_numero_de_commande) 'CInt = Convert Integer
int_numcommande = int_numcommande + 1
txt_numero_de_commande.Value = int_numcommande
End Sub
Est utilisé ci-dessus, une Variable Static pour que la variable ne soit pas réinitialisée à chaque appel de procédure. Autre technique : on la déclare en Public en dehors de la procédure
