concatenation et somme

Re,

Question très bête mais qui m'empèche d'avancer dans mon travail.

J'ai crée un code alphanumérique de référencement du type: FO000

Je souhaite par macro faire une incrémentation automatique.

Ainsi je fait une concaténation de FO et des 3 derniers chiffres de la cellule précédentes auxquels j'ajoute 1.

Imaginons que je soit rendu à FO021,ça me donne

FO + (021+1)= FO22 -->je n'ai plus que 2 chiffres.

Comment puis-je régler cela?

Voici cette macro:

Code:

---

Formulaire.Textbox = "FO" & Right(ActiveCell.Offset(-1, 0), 3) + 1

---

Merci!

Elumastebit

Re,

Ne cherchez plus (au cas où :P) j'ai trouvé une solution en contournant le problème et en prenant une méthode d'autofill:

Code:

---

Selection.AutoFill Destination:=Range(ActiveCell, ActiveCell.Offset(1, 0)), Type:=xlFillDefault

---

A plus tard.

Elumastebit