Générer un numéro de Commande en VBA

Bonjour,

Combien de nombre veut tu en aléatoire.

Je te propose la solution suivante :
ton numéro de commande sera composé de : Année / Heure, Minutes / Jour

ex:
Sub Test()

Dim sJourActuel As String
Dim sAnnee As String
Dim sHeure As Integer
Dim sJour As Integer
Dim iNumReference As String

sJourActuel = Now()
sAnnee = Mid(sJourActuel, 7, 4) 'on récupère l'année
sHeure = Mid(sJourActuel, 12, 2) & Mid(sJourActuel, 15, 2) 'on récupère l'heure
sJour = Mid(sJourActuel, 1, 2) 'on récupère le jour

iNumReference = sAnnee & sHeure & sJour 'on concatène le tout dans une variable


End Sub