Discussion :

[BettyBen]

Bonjour

Je n'arrive pas à mettre en forme une date saisie dans un UserForm :

Lors de la fermeture du UserForm les données saisies ("jj/mm/aaaa") sont recopiées dans des cellules d'une feuille de calcul au format "mm/jj/aaaa".

Je ne sais pas comment résoudre ce problème quelqu'un a-t-il une solution (En pièce jointe mon fichier)?

Merci d'avance

[Invité]

Bonjour,
De vba vers cellule Excel les dates toujours aux format international!
Cells(1,1)=format(me.ladate,"yyyy-mm-dd")

[eriiic]

Bonjour à tous,

ou bien:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Saisie").Cells(2, 4) = CDate(TextBox2.Value)

eric

[kiki29]

Salut, il serait bon que tu lises : Comprendre et gérer les dates sous Excel et en VBA

[BettyBen]

Bonjour à tous,

ou bien:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Saisie").Cells(2, 4) = CDate(TextBox2.Value)

eric

Bonsoir Eric,

Merci pour ta réponse ca fonctionne

[BettyBen]

Bonjour,
De vba vers cellule Excel les dates toujours aux format international!
Cells(1,1)=format(me.ladate,"yyyy-mm-dd")

Mercii rdurupt,

[Docmarti]

Bonjour.

Voici 2 façons d'éliminer tout risque d'inversion jour/mois :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Saisie").Cells(2, 4) = Format(DateValue(TextBox2), "yyyy/mm/dd") & " " & TimeValue(TextBox2.Value)

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("Saisie").Cells(2, 4).FormulaLocal = TextBox2.Value