Sub Lsteph() MsgBox 2 + Int(Now()), vbExclamation, "CDO" MsgBox 2 + Format(Now(), "dd/mmm/yyyy"), vbCritical, "Lsteph" End Sub
LSteph
Bonjour,
Pffff... forcément et tu parles de texte!! > qui a parlé de ..msgbox !
C'est lors du renvoi dans une cellule que doit être interprèté le format. Pour ma part c'est par là que je voyais un intérêt à ta réflexion. Alors relis l'objet car que tu sois d'accord ou pas le but était d'afficher la date sans l'heure Aussi si tu as une autre proposition libre à toi, mais mets là sous la question et pas sous mon post.
Merci
-- lSteph
CDO a écrit :
et c'est là où tu es dans l'erreur essaye
[a1] = Format(Now, "dd/mm/yyyy")
qui a parlé de [A1] ?????
Sub Lsteph() MsgBox 2 + Int(Now()), vbExclamation, "CDO" MsgBox 2 + Format(Now(), "dd/mmm/yyyy"), vbCritical, "Lsteph" End Sub
Bonjour,
Pffff... forcément et tu parles de texte!!
> qui a parlé de
..msgbox !
C'est lors du renvoi dans une cellule que doit être interprèté le format.
Pour ma part c'est par là que je voyais un intérêt à ta réflexion.
Alors relis l'objet car que tu sois d'accord ou pas le but était
d'afficher la date sans l'heure
Aussi si tu as une autre proposition libre à toi, mais mets là sous la
question et pas sous mon post.
Merci
--
lSteph
CDO a écrit :
et c'est là où tu es dans l'erreur essaye
[a1] = Format(Now, "dd/mm/yyyy")
qui a parlé de [A1] ?????
Sub Lsteph()
MsgBox 2 + Int(Now()), vbExclamation, "CDO"
MsgBox 2 + Format(Now(), "dd/mmm/yyyy"), vbCritical, "Lsteph"
End Sub
Pffff... forcément et tu parles de texte!! > qui a parlé de ..msgbox !
C'est lors du renvoi dans une cellule que doit être interprèté le format. Pour ma part c'est par là que je voyais un intérêt à ta réflexion. Alors relis l'objet car que tu sois d'accord ou pas le but était d'afficher la date sans l'heure Aussi si tu as une autre proposition libre à toi, mais mets là sous la question et pas sous mon post.
Merci
-- lSteph
CDO a écrit :
et c'est là où tu es dans l'erreur essaye
[a1] = Format(Now, "dd/mm/yyyy")
qui a parlé de [A1] ?????
Sub Lsteph() MsgBox 2 + Int(Now()), vbExclamation, "CDO" MsgBox 2 + Format(Now(), "dd/mmm/yyyy"), vbCritical, "Lsteph" End Sub