Récupérer le N° de série d'une date

[Philippe]

Bonjour le forum,

j'ai besoin de pouvoir récupérer le N° de série d'une date et d'une heure, c'est à dire faire l'équivalent d'une mise au format "nombre standard" d'une cellule
contenant une date ou une heure:

si j'ai en A1: 23/05/2011
comment (en VBA) avoir en B1: 40686

si j'ai en A2: 10:23
comment (en VBA) avoir en B2: 0,432639889

Merci pour votre aide

A+
Philippe

 

[wilfried_42]

Re : Récupérer le N° de série d'une date

bonjour philippe

je ne comprends pas ta question, en VBA ou sur excel, les dates sont comme tu le cherches. ce sont les differents format d'affichage qui leur donnent une apparence differente 25/02/2007 ou encore 10:23 mais dés que tu appliques le format standard, tu as ces valeurs

si tu veux ces valeur dans des textbox il faut une petite manip

textbox1.value = format(cbdl(my_date),"#####")
textbox2.value = format(cdbl(my_time),"0.#############")

 

[pierrejean]

Re : Récupérer le N° de série d'une date

bonjour Phillipe

salut Wilfried

Range("B1") = Format(Range("A1"), "0")
Range("B2") = Format(Range("A2"), "0.000000000")

 

[Spitnolan08]

Re : Récupérer le N° de série d'une date

Bonjour Philippe, Wilfried🙂 , Pierrejean🙂 ,

Sub dateHeure()
Range("B1") = CDbl(Range("A1"))
Range("B2") = CDbl(Range("A2"))
End Sub

Cordialement

 

[Philippe]

Re : Récupérer le N° de série d'une date

Bonjour Wilfried, Pierrejean,

en fait ce que je cherche à faire c'est récupérer la date et l'heure sous forme de N° de série afin des les intégrer au format texte au début d'une chaine pour pouvoir ensuite classer les chaines en question par ordre chronologique, mais je crois que j'ai trouvé... je teste et je vous tiens au courant...

A+ Philippe

 

[Philippe]

Re : Récupérer le N° de série d'une date

Bonjour Spitnolan,
on s'est croisé, merci pour le CDbl, c'est ce qu'il me fallait

Merci à tous

A+
Philippe