Generer un ID unique dans une colonne

Version imprimable

18/09/2010, 03h56
Tonton_glenn

Generer un ID unique dans une colonne

Bonjour a tous,

Je fait une nouvelle fois appelle à vous pour un probleme que je n'arrive pas à reseoudre après moulte recherches qui ne me conviennent pas :?.

Je souhaiterai dans une colonne generer une valeur unique (correspondant à une sorte d'index) de la forme Uxxxx ou xxxx sont des chiffres.

La particularité c'est qu'il me faut integrer ceci dans une macro (dc via un bouton qui remplirai la cellule) et que l'argument utilisé NE SOIT PAS prendre la cellule du dessus et l'incrementer de 1 mais plutot lire toute la colonne, reperer la valeur maximum et l'incrementer de 1, ceci dans un souci de tri de la premiere colonne (les index bougeront donc).

Voici un exemple de ce que je souhaite mettre en place :

http://img10.hostingpics.net/pics/676445excel2.jpg

Dans mon image de gauche, le bouton m'a permis de creer les index. apres un tri (donc id dans le desordre) et l'ajout d'une valeur en dessous, le bouton a reperer la valeur maximale (U0004) et a donc creer U0005 pour le suivant.

Auriez-vous une solution pour moi ?

En vous remerciant par avance 8-)

Bonjour

Une piste en utilisant un code de ce type testé sur une colonne A et un bouton de commande :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub CommandButton1_Click()
    Dim i As Long
    Dim lngMax As Long
 
    For i = 1 To Range("A1").End(xlDown).Row
        If CLng(Right(Range("A" & i).Value, 4)) >= lngMax Then
            lngMax = CLng(Right(Range("A" & i).Value, 4))
        End If
    Next i
 
    MsgBox "U" & Format(lngMax + 1, "0000")
 
End Sub

Philippe

18/09/2010, 12h30
Didier Gonard

Citation:

Envoyé par Tonton_glenn

La particularité c'est qu'il me faut integrer ceci dans une macro (dc via un bouton qui remplirai la cellule) et que l'argument utilisé NE SOIT PAS prendre la cellule du dessus et l'incrementer de 1 mais plutot lire toute la colonne, reperer la valeur maximum et l'incrementer de 1, ceci dans un souci de tri de la premiere colonne (les index bougeront donc).

Selon ce que j'en comprends, le plus simple sous vba serait de faire un tri transitoire de ton tableau sur la colonne id, donc le dernier serait forcément le plus élevé et il te suffit de rajouter 1 pour obtenir le suivant... puis de refaire le tri voulu.

ça devrait être bien plus rapide...

cordialement,

Didier