OVH Cloud OVH Cloud

Format de date

4 réponses
Avatar
Michel
Bonjour tout le monde,

je rentre dans une cellule :

DATE_NAV = CDate(CHECK_LIST.Label_Date_Nav.Caption)
Range("K" & ActiveCell.Row).Select
Selection.NumberFormat = "dd/mm/yy hh:mm:ss"


Excel reconnait correctement le format pas de probleme... :o)


Quand je veux recuperer l'information :

SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem (Range("K" &
ActiveCell.Row).Value)
ou
SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem CDate(Range("K" &
ActiveCell.Row).Value)

VBA m'inverse le jour avec le mois... :o(

Comment puis-je recuperer le bon format HH/MM/YY HH:MM:SS ?

Merci d'avance pour vos reponses,

@+

Michel.

4 réponses

Avatar
Daniel
Bonjour.
Comment mets-tu la date dans "Range("K" & ActiveCell.Row)"
Cordialement.
Daniel
"Michel" a écrit dans le message de
news:
Bonjour tout le monde,

je rentre dans une cellule :

DATE_NAV = CDate(CHECK_LIST.Label_Date_Nav.Caption)
Range("K" & ActiveCell.Row).Select
Selection.NumberFormat = "dd/mm/yy hh:mm:ss"


Excel reconnait correctement le format pas de probleme... :o)


Quand je veux recuperer l'information :

SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem (Range("K" &
ActiveCell.Row).Value)
ou
SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem CDate(Range("K" &
ActiveCell.Row).Value)

VBA m'inverse le jour avec le mois... :o(

Comment puis-je recuperer le bon format HH/MM/YY HH:MM:SS ?

Merci d'avance pour vos reponses,

@+

Michel.



Avatar
Michel
Salut,

DATE_NAV = CDate(CHECK_LIST.Label_Date_Nav.Caption)
Range("K" & ActiveCell.Row).Value = DATE_NAV
Range("K" & ActiveCell.Row).Select
Selection.NumberFormat = "dd/mm/yy hh:mm:ss"

@+

Michel.


"Daniel" a écrit dans le message de news:

Bonjour.
Comment mets-tu la date dans "Range("K" & ActiveCell.Row)"
Cordialement.
Daniel
"Michel" a écrit dans le message de
news:
Bonjour tout le monde,

je rentre dans une cellule :

DATE_NAV = CDate(CHECK_LIST.Label_Date_Nav.Caption)
Range("K" & ActiveCell.Row).Select
Selection.NumberFormat = "dd/mm/yy hh:mm:ss"


Excel reconnait correctement le format pas de probleme... :o)


Quand je veux recuperer l'information :

SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem (Range("K" &
ActiveCell.Row).Value)
ou
SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem CDate(Range("K" &
ActiveCell.Row).Value)

VBA m'inverse le jour avec le mois... :o(

Comment puis-je recuperer le bon format HH/MM/YY HH:MM:SS ?

Merci d'avance pour vos reponses,

@+

Michel.







Avatar
Daniel
Je n'ai pas réussi à reproduire ton problème.
Essaie :
SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem _
Format(Range("K" & ActiveCell.Row), "dd/mm/yy hh:mm:ss")
Daniel
"Michel" a écrit dans le message de
news:
Salut,

DATE_NAV = CDate(CHECK_LIST.Label_Date_Nav.Caption)
Range("K" & ActiveCell.Row).Value = DATE_NAV
Range("K" & ActiveCell.Row).Select
Selection.NumberFormat = "dd/mm/yy hh:mm:ss"

@+

Michel.


"Daniel" a écrit dans le message de news:

Bonjour.
Comment mets-tu la date dans "Range("K" & ActiveCell.Row)"
Cordialement.
Daniel
"Michel" a écrit dans le message
de news:
Bonjour tout le monde,

je rentre dans une cellule :

DATE_NAV = CDate(CHECK_LIST.Label_Date_Nav.Caption)
Range("K" & ActiveCell.Row).Select
Selection.NumberFormat = "dd/mm/yy hh:mm:ss"


Excel reconnait correctement le format pas de probleme... :o)


Quand je veux recuperer l'information :

SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem (Range("K" &
ActiveCell.Row).Value)
ou
SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem CDate(Range("K" &
ActiveCell.Row).Value)

VBA m'inverse le jour avec le mois... :o(

Comment puis-je recuperer le bon format HH/MM/YY HH:MM:SS ?

Merci d'avance pour vos reponses,

@+

Michel.











Avatar
Michel
Salut,

Tip-Top ca marche,

Un grand merci,

@+

Michel.




"Daniel" a écrit dans le message de news:
uI5J%
Je n'ai pas réussi à reproduire ton problème.
Essaie :
SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem _
Format(Range("K" & ActiveCell.Row), "dd/mm/yy hh:mm:ss")
Daniel
"Michel" a écrit dans le message de
news:
Salut,

DATE_NAV = CDate(CHECK_LIST.Label_Date_Nav.Caption)
Range("K" & ActiveCell.Row).Value = DATE_NAV
Range("K" & ActiveCell.Row).Select
Selection.NumberFormat = "dd/mm/yy hh:mm:ss"

@+

Michel.


"Daniel" a écrit dans le message de news:

Bonjour.
Comment mets-tu la date dans "Range("K" & ActiveCell.Row)"
Cordialement.
Daniel
"Michel" a écrit dans le message
de news:
Bonjour tout le monde,

je rentre dans une cellule :

DATE_NAV = CDate(CHECK_LIST.Label_Date_Nav.Caption)
Range("K" & ActiveCell.Row).Select
Selection.NumberFormat = "dd/mm/yy hh:mm:ss"


Excel reconnait correctement le format pas de probleme... :o)


Quand je veux recuperer l'information :

SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem (Range("K" &
ActiveCell.Row).Value)
ou
SUBSCRIPTION_REDEMPTION.ComboBox_NAV_DATE.AddItem CDate(Range("K" &
ActiveCell.Row).Value)

VBA m'inverse le jour avec le mois... :o(

Comment puis-je recuperer le bon format HH/MM/YY HH:MM:SS ?

Merci d'avance pour vos reponses,

@+

Michel.