Stocker des chiffres en string avec des 0 devant

Bonjour, je viens vers vous car j'ai un soucis avec VBA pour recuperer une zonede texte independante.
En fait je souhaite récuperer un string de 6chiffres commencant par 0 hors quand je recupere mes données par VBA il me shunt tous les zero de debut de string.
Exemple: Valeur saisie 000005 valeur recupérée par vba 5
Je seche un peu pour sauvegarder mes 0 de départ.

Une idée SVP ?
PS ma variable récupérant la zone de texte est bien de type string

Bonsoir,

Essaie en mettant @ dans la propriété format de la zone de texte.
Ça peut aider à interpréter la valeur en tant que chaîne de caractères.

A+
Christophe

Et si tu utilises la fonction format, tu ne peux pas arriver à tes fins ?

De mémoire, c'est un truc du genre :

MaVariableString = Format(9.4, "00000.00") ' devrait retourner, sauf erreur de ma part "00009.40".

Voici un lien sur MSDN :

http://msdn.microsoft.com/en-us/libr...ice.15%29.aspx

Geache

Bonjour,

Si tu enrégistres une valeur texte, normalement, les zéros de tête devraient être présents.
Pour vérifier que tu as bien du texte, tu peux utiliser un

Code:

---

Debug.Print VarType(maVariableL)

---

(string = 8).

Sinon, pour créer ce genre de valeur, j'ai l'habitude d'utiliser ceci

Code:

---

1 2 3

Dim Var1 As Integer Var1 = 5 Debug.Print Right("000000" & Var1, 6)

---