Fonction mid

bjr à tous:yaisse2:
aidez moi svp
comment je peux utiliser la fct Mid pour changer ce code ; je veux les 4 1ère chiffre

Code:

---

1 2	Dim valeur valeur = Worksheets(1).Range("ae7").Value

---

merci infiniment

merci à tous
je l'ai trouvé

Code:

---

1 2	Dim valeur valeur = Mid(Worksheets(1).Range("ae7").Value, 1, 4)

---

:yaisse2::yaisse2::yaisse2:

Autre possibilité

Code:

---

Valeur = Left(Sheets(1).Range("AE7"), 4)

---

merci:yaisse2::yaisse2::yaisse2: