Discussion:
Formater une textbox
(trop ancien pour répondre)
NICO.S
2004-04-26 10:51:09 UTC
Permalink
Bonjour,

J'arrives trés bien à donner un format monétaire à une textbox (locked) qui
récupère une valeur dans une cellule. Mais comment imposer lors d'une
saisie par un utilisateur par exemple un format de date dans une textbox ?

Merci.


NICO.S
papou
2004-04-26 11:23:21 UTC
Permalink
Bonjour
(merci à Michel Pierron)
Tu peux utiliser un contrôle supplémentaire MSMASK32.OCX
Clique droit sur la boîte à outils UserForm puis Contrôles supplémentaires
Cocher Microsoft Masked Edit Control
Ajouter le contrôle et inscrire ##/##/## dans la propriété Mask.
Sinon dans le code de ton Userform sur l'évènement Change de ton textbox
Private Sub TextBox1_Change()
Select Case Len(TextBox1)
Case 2, 5: TextBox1 = TextBox1 & "/"
End Select
End Sub

Cordialement
Pascal
Post by NICO.S
Bonjour,
J'arrives trés bien à donner un format monétaire à une textbox (locked) qui
récupère une valeur dans une cellule. Mais comment imposer lors d'une
saisie par un utilisateur par exemple un format de date dans une textbox ?
Merci.
NICO.S
garnote
2004-04-26 11:27:19 UTC
Permalink
Salut Nico,

Essaie cette instruction dans un Private Sub TextBox1:

TextBox1 = Format(TextBox1, "Le dddd dd mmmm yyyy")

Serge
Post by NICO.S
Bonjour,
J'arrives trés bien à donner un format monétaire à une textbox (locked) qui
récupère une valeur dans une cellule. Mais comment imposer lors d'une
saisie par un utilisateur par exemple un format de date dans une textbox ?
Merci.
NICO.S
Pascal Engelmajer
2004-04-26 11:40:26 UTC
Permalink
Salut,
à adapter :
http://www.ilyapa.net/baseExcel/dateTextBox.xls
en VBA éviter le format ##/##/## au profit de ##/##/####
ambigu (voir 29/02/03 => 03 février 2029 !!!)
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
Post by garnote
Salut Nico,
TextBox1 = Format(TextBox1, "Le dddd dd mmmm yyyy")
Serge
Post by NICO.S
Bonjour,
J'arrives trés bien à donner un format monétaire à une textbox (locked)
qui
Post by NICO.S
récupère une valeur dans une cellule. Mais comment imposer lors d'une
saisie par un utilisateur par exemple un format de date dans une textbox ?
Merci.
NICO.S
Continuer la lecture sur narkive:
Loading...