[RESOLU]Format pour une incrementation auto

[nrdz83]

Bonjour à tous

j'utilise ce code pour incrémenter automatiquement un Label à l'ouverture de mon userform

Label_Fiche = Application.CountA(Columns(1))

Cela fonctionne trés bien mais je voudrais lui imposer ce format

Format(Label_Fiche, "000") & " \ " & Year(Date)

Comment modifier mon code existant?

Par avance merci à tous

amitiés

 

[Cousinhub]

Re : Format pour une incrementation auto

Bonjour,

Peut-être ainsi :

Me.Label_Fiche = Format(Application.CountA(Columns(1)), "000") & " \ " & Year(Date)

Bonne journée

 

[nrdz83]

Re : Format pour une incrementation auto

Bonjour BHBH,

super un grand merci je peux continuer tête baissé dans mon classeur Excel.

Toujours au SSF ?

Amitiés

 

[Cousinhub]

Re : Format pour une incrementation auto

Toujours au SSF ?

Hélas non, mais je ne désespère pas...

En ce moment, en SUPPA à la div "Exploit" d'ALFB, et en attente du PAM (pour un poste au SSF...)

*Comprenne qui pourra.....