Discussion :

[triaguae]

Bonjour,

je cherche à avoir une confirmation de ce que je viens de constater :
j'ai constaté un problème de date en vba (inversion du jour et du mois, chose classique du genre : 01/03/11 sur la feuille et quand ça passe dans le code, je récupère 03/01/11)

j'ai essayé de forcer le format (dd/MM/yy), d'utiliser Cdate

et je viens de constater que si je déclare une variable en date et non en string , celà suffit à conserver le format entré dans la feuille de calcul, plus besoin d'artifice quelconque

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub CommandButton1_Click()
Dim madate As Date
 
madate = Cells(1, 1).Value
 
Cells(3, 1).Value = madate
Cells(4, 1).Value = CDate(madate)
 
End Sub

qqn peut-il me confirmer cela!!!

[pgz]

Bonjour.

réponse : oui.
Et un peu de lecture sur les dates : là.

Cordialement,

PGZ

[triaguae]

ça fait bien 2 ans que je galère avec cette histoire là!!

merci

[pijaku]

Bonjour,
Ayant déjà eu à lutter contre ces formats étranges que revêtent les dates sous VBA, je te confirme que la meilleure solution est de déclarer tes dates... en Date.
Pour que ton test soit complet :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub essai()
Dim madate As Date
Dim madate2 As String
madate = Cells(1, 1).Value
madate2 = Cells(1, 1).Value
Cells(3, 1).Value = madate
Cells(4, 1).Value = CDate(madate)
Cells(5, 1).Value = Format(madate, "dd/mm/yyyy")
Cells(6, 1).Value = Format(madate, "mm/dd/yyyy")
Cells(3, 2).Value = madate2
Cells(4, 2).Value = CDate(madate2)
Cells(5, 2).Value = Format(madate2, "dd/mm/yyyy")
Cells(6, 2).Value = Format(madate2, "mm/dd/yyyy")
End Sub

[Didier Gonard]

Bonjour,

j'ai constaté un problème de date en vba (inversion du jour et du mois, chose classique du genre : 01/03/11 sur la feuille et quand ça passe dans le code, je récupère 03/01/11)

Il ne s'agit pas d'un problème classique d'Excel (ni de formats étranges), mais d'un problème de compréhension de son fonctionnement

vois ce tutoriel au besoin :

Comprendre et gérer les dates sous Excel et en VBA

cordialement,

Didier