F
fabrice
Guest
bonjour le forum,
Voila mon petit probleme,
G un UF avec en textbox1 une date à saisir. g tapé le code suuivant mais le probleme est que qd je mets la valeure du textbox1 dans ma feuille XL, il me la reconnait pas comme une date!!!!!!! :=(
Comment faire pour qu'il sache qu'il s'agit d'une date???
Code tapé:
Private Sub TextBox1_Change()
Dim fab As String
fab = TextBox1.Text
Select Case Len(fab)
Case 2, 5
fab = fab & "/"
End Select
TextBox1.Text = fab
End Sub
Merci de votre réponse,
FAb
Voila mon petit probleme,
G un UF avec en textbox1 une date à saisir. g tapé le code suuivant mais le probleme est que qd je mets la valeure du textbox1 dans ma feuille XL, il me la reconnait pas comme une date!!!!!!! :=(
Comment faire pour qu'il sache qu'il s'agit d'une date???
Code tapé:
Private Sub TextBox1_Change()
Dim fab As String
fab = TextBox1.Text
Select Case Len(fab)
Case 2, 5
fab = fab & "/"
End Select
TextBox1.Text = fab
End Sub
Merci de votre réponse,
FAb