Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Format date JJ/MM/AA

204 views
Skip to first unread message

Marc de N.

unread,
Sep 18, 2003, 9:29:28 AM9/18/03
to
Bonjour à toutes et tous.

Dans une feuille j'ai une colonne de date.
Le format initial est JJ/MM/AA, pour être sur d'avoir un
format date j'utilise la fonction "calendar" pour saisir
la date.
Dans le déroulement j'ai besoin de copier cette date dans
une autre cellule.
------------------------------------
Public etad as Date
etad = range ("C2"). Value
'Que je sauvegarde dans une autre cellule !
Range ("C10"). Value = etad
-------------------------------------
Lors de cette manipulation je retrouve des dates sous la
forme MM/JJ/AAAA
Merci de m'indiquer la commande pour verrouiller la date
sous la forme date JJ/MM/AA
Ce programme est sur un réseau ou est connecté des
machines équipées de Windows NT et 2000, des Excel 98 et
2000
Slts @+
Marc

isabelle

unread,
Sep 18, 2003, 10:20:58 AM9/18/03
to
bonjour Marc,

Range("C10").Value = Format(etad, "DD/MM/YY")

isabelle

"Marc de N." a écrit :

Jean-Paul Viel

unread,
Sep 18, 2003, 10:25:09 AM9/18/03
to
Bonjour,

Vba a été créé en anglais. Au USA la date commence par le mois. La date dans
une cellule étant un chiffre qui donne le nombre de jour depuis le 1 jan
1900. Le compilateur VBA interprète ce chiffre à l'américaine. Utilise la
fonction format pour avoir la date comme tu désires.

format(LaDate, "dd/mm/yy")


--
JP
j...@solutionsvba.com
http://www.solutionsvba.com


"Marc de N." <marc.b...@alcatel.fr> wrote in message
news:0da401c37de8$e2a848b0$a401...@phx.gbl...

Marc de N.

unread,
Sep 22, 2003, 10:20:59 AM9/22/03
to
Bien reçu vos messages

Ma ligne actuelle était
----------------------------

Sub SauvG_Devis(SauvG_Devis As MSForms.UserForm)
'Macro de sauvegarde des infos
générales du devis
Sheets("devis").Select
Range("A2").Value = Num
Range("C2").Value = etad
End Sub
---------------------------------
J'ai mis
Sub SauvG_Devis(SauvG_Devis As MSForms.UserForm)
'Macro de sauvegarde des infos
générales du devis
Sheets("devis").Select
Range("A2").Value = Num
Range("C2").Value = Format(etad, "DD/MM/YY")
End Sub
Cela m'inscrit le message d'erreur « propriété ou méthode
non gérer par cet objet ».

Merci de votre aide à plus
Salutations
Marc


>-----Message d'origine-----

>.
>

Marc de N.

unread,
Sep 22, 2003, 10:21:58 AM9/22/03
to
Bien reçu vos messages


>-----Message d'origine-----

>.
>

Marc de N.

unread,
Sep 25, 2003, 3:41:27 AM9/25/03
to
Bonjour à toutes et tous

Dans un module j'ai écris
------------------
Public etad As Date
------------------
Dans le projet la date DD/MM/YY devient MM/DD/YY
Merci de m'indiquer une méthode pour verrouiller la
variable en DD/MM/YY.
Afin de la Ranger dans une cellule avec la bonne
configuration.
Le projet est utilisé sur un réseau avec des machines
équipées de Excel 97 et 2000.
Salutations
Marc

0 new messages