Utilisation de monthview sur plusieurs textbox

Bonjour,
j'ai un userform U1 avec plusieurs TextBox
un userform U2 contient un calendar "monthview"

• • Dans U1

Private Sub TextBox2_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
U2.Show
End Sub
Private Sub TextBox9_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
U2.Show
End Sub
Private Sub TextBox15_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
U2.Show
End Sub

• • Dans U2

Private Sub Calendar_DateClick(ByVal DateClicked As Date)
U1.TextBox2.Value = DateClicked
U2.Hide
End Sub
Private Sub Calendar_DateClick(ByVal DateClicked As Date)
U1.TextBox9.Value = DateClicked
U2.Hide
End Sub
Private Sub Calendar_DateClick(ByVal DateClicked As Date)
U1.TextBox15.Value = DateClicked
U2.Hide
End Sub

Si On double click sur TextBox2 -- U2 apparait on selectionnant une date elle est reportée sur TextBox2 (c'est bon)
Par contre Si On double click sur TextBox9 ou TextBox15-- U2 apparait on selectionnant une date rien ne se passe.
pourqoui?

</code>