VBA EXCEL - Comment faire apparaître le 0 devant un chiffre ?

Résolu
pixissama Messages postés 20 Statut Membre -  
pixissama Messages postés 20 Statut Membre -
Bonjour,
Je suis en train de créer mon formulaire et je veux que, lorsque je change la valeur d'une cbbox, l'ordi aille me chercher cette valeur dans un tableau et me rende le numéro associé (principalement ce qu'on fait avec EQUIV et INDEX). Jusque là j'ai réussi mais j'aimerais que lorsqu'il doit me rendre "8", il me rende en fait "08".

Je me doute qu'il doit y avoir une variante de Format(...) mais je sais pas laquelle...
Je vous mets mon code en dessous :

Private Sub txtbox1_Change()

Worksheets("données").Select

Dim valeur As Long

On Error GoTo pbm

valeur = Columns("H").Find(Me.txtbox1, Range("H1"), xlValues).Row
Me.codetxtbox1 = Cells(valeur, "G")
' je pensais faire quelque chose comme Format(Cells(valeur, "G"), 00) mais ça ne fonctionne pas.
Exit Sub

pbm:
Me.codetxtbox1 = ""

End Sub


Merci d'avance de votre aide !!!
A voir également:

2 réponses

Patrice33740 Messages postés 8930 Statut Membre 1 781
 
Bonjour,

Il manque les quotes (et le parent et la propriété !!!) :
Me.codetxtbox1 = Format(Worksheets("données").Cells(valeur, "G").Value, "00") 


1
pixissama Messages postés 20 Statut Membre
 
merci je suis pas très doué je fais comme je peux en allant chercher à droit à gauche et en apprenant sur le tas !
du coup, problème réglé !
0