- Nom du jour d'une date qui merde

Voila mon code :
Dim myDate As String
Dim D As Date
D = 23 / 6 / 2002
D = DateSerial(Year(D), Month(D), Day(D))
myDate = WeekdayName(Weekday(D), , vbSunday)
MsgBox myDate

Le code merdouille car il ne m'affiche pas le bon nom qd je change la date D ou il m'affiche toujours "samedi"
merci pour votre aide....
chaps

D="23/06/2002"
Ca marchera
jean-marc.lucien@acoss.fr



-------------------------------
Réponse au message :
-------------------------------

Voila mon code :
Dim myDate As String
Dim D As Date
D = 23 / 6 / 2002
D = DateSerial(Year(D), Month(D), Day(D))
myDate = WeekdayName(Weekday(D), , vbSunday)
MsgBox myDate

Le code merdouille car il ne m'affiche pas le bon nom qd je change la date D ou il m'affiche toujours "samedi"
merci pour votre aide....
chaps