XL 2010 incrementer une serie de numero en vba

Meloman

XLDnaute Occasionnel
bonsoir à tous malgre mes recherche je n'arrive pas via un bouton valider incrementer une serie de numero

exemple en A1 = I0000001
A2=Iooooooo2
A3=I0000003 ........


je sais pas du tout comment m'y prendre

pouvez vous m'aider svp
 

Fichiers joints

Meloman

XLDnaute Occasionnel
Bonjour JBARRE merci pour ton aide mais je crois je me suis fait mal comprendre integrer dans une combobox la liste en colonne A je sais le faire c'est incrémenter un numero intervention suivante pour une future fiche que je n'arrive pas car le numero commence par une lettre
 

JHA

XLDnaute Barbatruc
Bonjour à tous,

Pour éviter le pproblème de la lettre, tu peux mettre un format de nombre personnalisé
"I"0000000

JHA
 

Fichiers joints

gonz19

XLDnaute Occasionnel
bonjour,

pour récupérer la derniére cellule vide et incrémenter

Code:
Private Sub UserForm_Initialize()
ligne = Range("A65536").End(xlUp).Row
numero = Left(Cells(ligne, 1).Value, 1) & Format(Right(Cells(ligne, 1).Value, 7) + 1, "0000000")
ComboBox1.AddItem (numero)
End Sub
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas