Microsoft 365 récupérer format date d'un textbox dans mon tableau

sylvanu à dit:

Bonjour Patrice,
VBA ne parle qu'anglais donc il interprète la date en notation anglaise.
Testez :

VB:

ActiveCell = CDate(" " & Textdate.Value)

L'espace rend la date comme une chaine et non comme une date, ce qui berne le VBA.

Cliquez pour agrandir...

ChTi160 à dit:

Bonjour tahon.patrice
ce que j'ai modifié (perfectible)

VB:

'procedure pour valider saisie dans base de donnees

Private Sub btnajout_Click()
    With Sheets("index")
       With .Cells(.Cells(.Rows.Count, 1).End(xlUp).Row + 1, 1)
              .Value = DateValue(Textdate.Value)
              .Offset(0, 1) = Textjour.Value
              .Offset(0, 2).Value = Textnuit.Value
    End With
    End With
End Sub

Bonne Journée
Jean marie

Cliquez pour agrandir...