Format de date - lien entre VBA et Feuille XL

[frdl]

Bonjour,

J'ai crée une Userform qui demande une date.
La date est ensuite importée dans XL grace à la formule vba suivante :

Range("date1").Value = Userform.date1.Value

Le pb c'est que quand je saisis 01/07/2004, la cellule XL revoie 07/01/2004, ce qui n'est pas sans poser de pb, vous en conviendrez.

Merci de votre aide.

 

[@+Thierry]

Bonjour Fred, le Forum,

Savais-tu qu'il y a un moteur de recherche dans ce Forum ? En haut sous la banière XLD :

​

Faire une recherche​

Les mots clef "TextBox" + "Date" auraient dû te renvoyer sur un tas de réponses.... Car c'est une question redondante et récurrente...

Tu as deux méthodes :

1) tu passes par une variable date
Dim TheDate As Date

TheDate = Userform.date1.Value

Range("date1").Value = TheDate

2) tu converties la Date directement :
Range("date1").Value = Cdate(Userform.date1.Value)

Bien entendu il faut envisager une gestion d'erreur car si ce n'est pas une date dans la TextBox.... badaboum !!

Bonne Soirée
@+Thierry

 

[frdl]

Merci.

Mais j'ai du mal chercher sur le forum