Pb récup d'une nb dans un .value

Bonjour,

Je suis bloqué dans mon code car le code récupère un champs excel pour lequel le format est un nombre à 6 chiffres "000000" par défault.

J'ai modifier le format de la cellule pour que si le nombre renseigné est "42453" alors il affiche "042453"

Le pb c'est que dans le code, je récupère la valeur de ce champ et la valeur prise en compte est "42453" alors que je voudrais avoir "042453"

Voici le code qui récupère la valeur du champ:

Code:

---

Cde = Range("K1").Value

---

Est ce qq1 a compris déjà ?
Si oui peux tu m'aider ?

Merci d'avance

Nini

Bonjour

L'utilisation d'un format personnalisé ne modifie pas la valeur de la cellule. Donc, la saisie est numérique, et la valeur de K1 est donc forcément numérique. Il n'y a que l'affichage qui est modifié.
Dès lors, en VBA, tu récupères la valeur de K1 qui est numérique et donc les 0 non significatifs sont supprimés. Tu dois donc transformer ta valeur numérique en chaine de caractères
Utilise

Code:

---

1 2	Cde = format(Range("K1").Value,"000000")

---

Il faut que la variable Cde soit de type Variant ou String

Ok?

Pierre Fauconnier, tu es bon !;) :king:

Merci pour ton aide

Cà fonctionne pile poil

A bientôt