Masque pour une texte box dans un userform

sylv@in · 29 Juillet 2008

Bonjour,

dans une application j'ai créé un userform pour que l'utilisateur rentre des données dont l'une des données est une date

J'aurais voulu savoir s'il était possible de limiter ce que l'utilisateur rentre avec un masque pour limiter le nombre d'erreur et voir si la date entré est vraie (pas avoir un 35/15/2008 et avoir un masque du genre **/**/**** ou l'utilisateur aurait juste a rentrer les infos a la place des étoiles)

merci d'avance

wilfried_42 · 29 Juillet 2008

Re : Masque pour une texte box dans un userform

Bonjour

regarde ce fil chez nos amis de developpez.com, tirex a fait quelque chose de geant

ICI

BOISGONTIER · 29 Juillet 2008

Re : Masque pour une texte box dans un userform

Bonjour,

http://boisgontierjacques.free.fr/fichiers/Formulaire/MasqueSaisie.xls

JB

sylv@in · 29 Juillet 2008

Re : Masque pour une texte box dans un userform

bonjour boisgontier,

j'aurais voulu avoir quelque explications sur ton code ligne par ligne car ne comprenant pas tout je n'arrives pas à l'adapter dans mon code ca ne marche pas jpeux pas rentrer plus que les deux premiers nombre

Private Sub UserForm_Initialize()
Me.TextBox1 = "../../.."
p = 0
Me.TextBox1.SelStart = p
Me.TextBox1.SelLength = 1
End Sub

Private Sub TextBox1_Change()
p = p + 1
If p = 2 Or p = 5 Then p = p + 1
Me.TextBox1.SelStart = p
Me.TextBox1.SelLength = 1
End Sub

Masque pour une texte box dans un userform

sylv@in

XLDnaute Junior

wilfried_42

XLDnaute Barbatruc

BOISGONTIER

XLDnaute Barbatruc

sylv@in

XLDnaute Junior

Discussions similaires