bonjour
j'aurais voulu avoir quelques explications sur ce morceau de code ligne par ligne car ne comprenant pas tout je n'arrives donc pas à l'adapter pour mon cas. chez moi ca ne marche pas jpeux pas rentrer plus que les deux premiers nombre 12/**/**** une fois que j'ai tapé 12 le curseur reste bloqué sur 2 et ne veux pas passer au premier chiffre du mois
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
j'aurais voulu avoir quelques explications sur ce morceau de code ligne par ligne car ne comprenant pas tout je n'arrives donc pas à l'adapter pour mon cas. chez moi ca ne marche pas jpeux pas rentrer plus que les deux premiers nombre 12/**/**** une fois que j'ai tapé 12 le curseur reste bloqué sur 2 et ne veux pas passer au premier chiffre du mois
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