Microsoft 365 Textbox et format date

[JBL07]

Bonjour le Fil,

J'ai un souci, j'ai créé un userform, dont la première zone de texte doit s'exporter dans mon tableau de données sous une forme date ( dd/mm/yyy), sinon je ne peux pas afficher de segment "chronologie" : excel me dit qu'il n'y a pas de champs au format date dans le tcd associé -
voilà mon code, qui peut me montrer la modif ou le code svp ?

Merci !

Private Sub AddButton_Click()

'recherche de la première ligne vide
l = 3
While Not IsEmpty(Cells(l, 1))
l = l + 1
Wend

'saisie des données
Cells(l, 1) = DateBox.Text
Cells(l, 2) = VariétéCombobox.Text
Cells(l, 3) = PoidsBox.Text
Cells(l, 4) = PotsBox.Text
Cells(l, 5) = BocauxBox.Text

'Remise à zéro des champs de saisie du userform
DateBox.Text = ""
VariétéCombobox.Text = ""
PoidsBox.Text = ""
PotsBox.Text = ""
BocauxBox.Text = ""

'Cacher le userform
SaisiePotsUF.Hide

End Sub

 

[JBL07]

je voulais écrire dd/mm/yyyy bien sûr, j'ai oublié un z

 

[fanfan38]

Bonjour
Un fichier est TOUJOURS le bienvenu
Cells(l, 1) = cdate(DateBox.Text)

A+ François

 

[JBL07]

Bonjour
Un fichier est TOUJOURS le bienvenu
Cells(l, 1) = cdate(DateBox.Text)

A+ François

Super, un grand merci !