Récupérer une date pour l'afficher dans un textbox au format français

Question

Je veux récupérer une date dans une feuille Excel pour l'afficher dans un textbox au format français jj/mm/aaaa. Quelle est la ligne de commande ?

Si je récupère le contenu de la cellule par cells.value, la textbox affiche DATE.

Merci

Answer 1

Bonjour,

Si la date en A1 est au format français :

Me.TextBox1 = [A1]

Daniel

Answer 2

Que contient exactement la cellule concernée ? Une date au format texte ? Au format US ? Un nombre ?

Si, par exemple, tu as dans la cellule A1 une chaine correspondant à une date au format US (disons "02/14/2024"), tu peux écrire ces lignes :

MaDate = Range("A1").Value
MonMois = Left(MaDate, 2)
MonJour = Mid(MaDate, 4, 2)
MonAnnee = Right(MaDate, 4)
DateFR = DateSerial(MonAnnee, MonMois, MonJour)
MsgBox DateFR

Ce qui peut évidemment aussi s'écrire :

MaDate = Range("A1").Value
MsgBox DateSerial(Right(MaDate, 4), Left(MaDate, 2), Mid(MaDate, 4, 2))

Answer 3

Désolé d'avoir répondu si tard mais je n'avais pas de connexion internet

Merci pour le coup de main. Ma question était stupide , je ne pointais pas sur la bonne cellule.

le Problème est résolu

Answer 4

C'est une date au format dd/mm/aaaa .format français le 10/02/2024 correspond bien au jour 10 , mois 02', année 2024. C'est précisément cette date dans ce format que je veux récupérer. C'est la date d'enregistrement de mon formulaire quand il est rempli la 1ère fois , ensuite elle est affichée dans une userform qui permet des modifications sauf ce champ date.

Merci