Affichage du numéro client sans doublons

[Tophe2]

Bonjour le forum
Voilà je cherche à afficher dans une textbox le n° de client suivant en fonction du dernier numéro saisie (il se peut que ce ne soit pas forcément celui inscrit sur la ligne au dessus, si tri par nom, adresse ....) pour qu'il puisse apparaitre sans saisie seul le nom, prénom ...... resteront à être saisie.
Plusieurs clients peuvent faire plusieurs stages différents.
Ci joint un fichier exemple
Merci pour votre aide.
Christophe.

 

[Cousinhub]

Re : Affichage du numéro client sans doublons

Bonsoir,

essaie dans l'initialisation de ton userform :

Private Sub UserForm_Initialize()
Dim DerLig As Long, X As Integer
DerLig = [C65000].End(xlUp).Row
X = Application.Max(Range("C2:C" & DerLig))
Me.TextBox4.Value = X + 1
End Sub