Bonjour à tous !
Je me suis fait un userform pour récolter des informations de reservations pour par la suite les retranscrires dans un tableau :
Voici le code que j'utilise pour retranscrire les informations :
Private Sub ValiderRéserv_Click()
Feuil3.Rows("2:2").Insert shift:=xlDown
Feuil3.Range("A2") = Feuil3.Range("A3").Value + 1
Feuil3.Range("H2").NumberFormat = "#,##0.00 €"
Feuil3.Range("J2").NumberFormat = "#,##0.00 €"
Feuil3.Range("B2") = Me.CbProd.Value
Feuil3.Range("D2") = Me.Cbclient.Value
Feuil3.Range("E2") = Me.TxDatedeb.Value
Feuil3.Range("F2") = Me.TxDatefin.Value
Unload Me
MsgBox "Nouvelle réservation enregistrée"
End Sub
Sauf que voilà une fois sur 2 les dates sont mal retranscrite dans le tableau. Exemple :
Quelqu'un aurait une idée de la provenance du problème ? ça fais une heure que je m'arrache les cheveux !
Merci beaucoup !!