des identifiants et des dates ...

Marsh Posté le 19-10-2005 à 16:44:41

Bonjours, dans le but d'éditer des identifiants je voudrait écrire une fonction qui me renvoie une String au format suivant (avec a = année m = mois et j = jours) : aaaammjj-00 (le 00 signifie un nombre sur deux chiffres)
Bref je voudrait extraire la date du jours, la formaté comme indiqué précedement, mettre ca dans une String et concaténer avec un tiret, et un nombre à deux chiffre qui débuterais chaque jours à 0 et s'incrémenterait chaque fois que l'on fait appelle à la fonction.

L'ennui c'est que j'utilise la fonction Date() pour récuperer la date, mais je n'arrive pas à la formater correctement, ni à rajouter le - et le chiffre à la fin
Quelqu'un saurait il comment faire ? me mettre sur une piste ?
Merci

Marsh Posté le 19-10-2005 à 16:44:41

Marsh Posté le 19-10-2005 à 17:28:43

En VBS :

Code :

num = 12
ma_date = DatePart("yyyy" , Now) & Right("00" & DatePart("m" , Now), 2) & Right("00" & DatePart("d" , Now), 2) & "-" & num
wscript.echo ma_date

donne

20051019-12

Message édité par olivthill le 19-10-2005 à 17:38:09

Marsh Posté le 20-10-2005 à 09:24:52

Merci

Marsh Posté le 20-10-2005 à 10:38:18

En VBA la fonction Format$ répond à tes attentes

Format$("23/09/2005", "yyyymmdd-" )

renvoie

20050923-

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *