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 :

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
Vous remerciant de votre concours,

Cordialement

Guy