copie de contenu et format date

[teddy7]

Bonjour,

Grand débutant, je butte sur la copie d'une cellule contenant une date. voici ce que je fais :

FeuilleClient.Cells(J, 3) = FeuilleClient.Cells(K, 3)

Dans FeuilleClient.Cells(K, 3) j'ai 03/09/2010
et dans FeuilleClient.Cells(J, 3) je recupère 40424 !!!???

A priori, ce serait une question de format qui n'est pas bon. Mais comment faire pour retrouver la bonne valeur ?
Sur la meme ligne je copie d'autre cellule qui contiennent du texte et là ca marche sans pb.

Merci pour votre aide
Teddy

 

[Victor21]

Re : copie de contenu et format date

Bonsoir, teddy7

Mets J3 au format date.

 

[teddy7]

Re : copie de contenu et format date

Merci Victor, c'est ce que je viens de faire et ca marche tres bien 😉

 

[Staple1600]

Re : copie de contenu et format date

Bonsoir le fil

teddy7
Si tu veux faire le tout en VBA.

Sub test()
With Feuil2.[A1]
    .Value = Feuil1.[A1]
    .NumberFormatLocal = "jj/mm/aaaa"
End With
End Sub

PS: à adapter avec le nom de tes feuilles et les références des cellules que tu utilises