Format date

Bonjour à tous

Dans mon formulaire j'ai cette ligne :

ActiveCell.Offset(0, 1).Value = frmajout.txtdate.Value

qui permet d'ajouter une date dans une cellule.

Hors cette date n'est pas au bon format malgré que j'ai formaté la colonne contenant les dates au format date.

je sais qu'il il une commande format genre format (yy/mm/aaaa) pour formater mais je ne sais pas ou il faut le placé dans cette ligne de code

merci d'aider un novice en vba

Bonsoir

Est-il possible de joindre un fichier

Bonjour,

Le format se règle toujours au niveau du format de cellule.

ActiveCell.Offset(0, 1) = CDate(txtdate.Value)

Ceci devrait suffire pour l'affectation. Excel applique normalement le format de date par défaut si la cellule est au format Standard.

NB- L'utilisation d'ActiveCell pour adressage ne me paraît pas une bonne idée, c'est toujours quelque peu aléatoire, un bon adressage ne doit pas comporter d'ambiguïté.

merci

j'ai essayer la solution de mferrabd mais cela ne marche pas. merci quand même

je joint mon fichier

Bonjour,

Et avec DateValue() ?

ActiveCell.Offset(0, 1).Value = DateValue(frmajout.txtdate.Value)

Bonjour,

Tu n'as pas dû l'essayer !

Merci

ça fonctionne

cordialement

Rechercher des sujets similaires à "format date"