Bonjour,
Dans un formulaire, je dois renseigner différentes dates par le biais de différentes texbox et ce grâce à calendar.
Je pensais que le fait de passer par exemple à texbox2 la valeur initialement renseignée dans texbox1 par calendar serait figée, mais il n'en est rien. Comment puis-je bloquer une valeur dans un objet tout en me permettant d'y revenir ultérieurement si nécessaire.
Personnellement, j'avais écrit :
Vous remerciant de votre concours,
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 Private Sub cmdvalider_Click() 'mettre une date dans le textbox1 If Not IsDate(TextBox1) Then MsgBox ("mettre une date") Me.TextBox1.SetFocus TextBox1.Value = Calendar1.Value Exit Sub End If 'mettre une date dans le deuxième textbox2 If Not IsDate(TextBox2) Then MsgBox ("mettre une deuxième date") Me.TextBox2.SetFocus TextBox2.Value = Calendar1.Value Exit Sub End If Range("a1").Value = TextBox1 Range("a2").Value = TextBox2 End Sub
Cordialement
Guy
Partager