VBA numéro de commande

[juju3481]

Bonjour,
je réalise un formulaire de commande sur excel et je bloque sur le numéro de commande.
celui-ci est de la forme 050613/1 si c'est une commande passée le 05 juin 2013 et /1 si c'est la première de la journée.

je souhaiterais qu'une cellule prenne cette valeur en fonction de la date. pour le /1 un simple test suffit mais c'est sur le reste que je bloque.

en vous remerciant d'avance pour votre aide

Cordialement

Julien

 

[Orodreth]

Re : VBA numéro de commande

Bonjour,

Si c'est la date qui te pose un problème, et que tu travailles en VBA:

Dim d_Date As Date
d_Date = Date()
Dim i_Jour As Integer
Dim str_Jour As String
i_Jour = Day(d_Date)
str_Jour = iif(i_Jour < 10, "0" & cstr(i_Jour), cstr(i_Jour))

Dim i_Mois As Integer
Dim str_Mois As String
i_Mois = Month(d_Date)
str_Mois = iif(i_Mois < 10, "0" & cstr(i_Mois), cstr(i_Mois))

Dim i_Annee As Integer
Dim str_Annee As String
i_Annee = Year(d_Date)
str_Annee = Right(Cstr(i_Annee), 2)

Dim str_DateFormatee As String
str_DateFormatee = str_Jour & str_Mois & str_Annee

Cordialement,

 

[juju3481]

Re : VBA numéro de commande

C'est exactement ça que je cherchais à faire ! Merci beaucoup

 

[Orodreth]

Re : VBA numéro de commande

Je t'en prie.

Petite modif de code, ce n'est pas "< 100" mais "< 10", faute de frappe, désolé 🙂