utiliser la date et l'heure pour faire une numéro

[Gwendoline]

Bonsoir,

Je lutte, je lutte en vain, mais je sais que ça existe.

Je veux utiliser la date et l'heure pour en faire un numéro. Je m'explique.
Avec l'année, le mois, le jour, l'heure, la minute et la seconde, j'obtiendrais un numéro.

Exemple :
Il est 00:05:49 et nous sommes le 06 mai 2013.
J'obtiendrai alors en cellule A1 : 20130506_000549.

J'ai essayé ceci mais ça ne fonctionne pas :

heure = hour(today)
minut = minute(today)
seconde = second(today)
jour = day(today)
mois = month(today)
annee = year(today)

nbdc = annee & mois & jour & heure & minut & seconde

ça se trouve je me plante complètement 🙂

Merci par avance en tout cas.

 

[Modeste geedee]

Re : utiliser la date et l'heure pour faire une numéro

Bonsour®

Bonsoir,

Je veux utiliser la date et l'heure pour en faire un numéro. Je m'explique.
Avec l'année, le mois, le jour, l'heure, la minute et la seconde, j'obtiendrais un numéro.

Exemple :
Il est 00:05:49 et nous sommes le 06 mai 2013.
J'obtiendrai alors en cellule A1 : 20130506_000549.

J'ai essayé ceci mais ça ne fonctionne pas :
nbdc = annee & mois & jour & heure & minut & seconde
[/CODE]

ça se trouve je me plante complètement 🙂

🙄

nbdc=Format(Now, "yyyymmdd""_""hhmmss")

 

[ROGER2327]

Re : utiliser la date et l'heure pour faire une numéro

Bonjour à tous.

Je n'ai pas de meilleure solution, mais je l'écrirais comme ceci :​

Function nbdc$()
Dim d As Date
    d = Now
    nbdc = Format(d, "yyyymmdd""_""hhmmss")
    Application.Wait d + TimeValue("0:00:01")
End Function

pour ne pas risquer de créer deux fois le même numéro.

(Sans cette précaution,​

Sub testa()
Dim i&
    For i = 1 To 5000
        Cells(i, 1) = nbdc
    Next
End Sub

crée des milliers de numéros identiques.)​

Bonne nuit.


ROGER2327
#6629

Mardi 17 Palotin 140 (Saint Macrotatoure, caudataire - fête Suprême Quarte)
17 Floréal An CCXXI, 0,6430h - pimprenelle
2013-W19-1T01:32:36Z

 

[Gwendoline]

Re : utiliser la date et l'heure pour faire une numéro

Oh mais merci beaucoup.
J'ai utilisé la 1e méthode. Elle fonctionne.
Pour la 2e aussi.