Comment Interdire les doublons au départ d'un enregistrement ?

Bonsoir membres du forum,

Cette discussion est en rapport avec celle d'ici https://forum.excel-pratique.com/excel/enregistrer-des-donnees-sur-une-feuille-excel-174621

Je recherche un code VBA Excel qui me permettrait d'empêcher les doublons du champ ID_Etal .

https://forum.excel-pratique.com/excel/remonter-de-doublon-140216#p860389

Cordialement.

Bonjour,

D'abord merci d'avoir fait référence à l'autre fil dans votre demande.

Je suppose que c'est lorsque vous voulez ajouter un établissement ? Si oui, mettez ce code dans l'userform "UserFormEtablissScol"

Private Sub UserForm_Initialize()
With TextBoxID_Etabl
    .Enabled = False 'eviter acces a la textbox
    .Value = WorksheetFunction.Max(Feuil1.ListObjects("T_etabl").ListColumns(1).DataBodyRange.Value) + 1
End With
End Sub

A l'ouverture de l'USF, le code vous mettra directement un nouvel ID dans la textbox

Vous devriez mettre la propriété "Enabled" de TextboxID à False par défaut. Cela vous éviterait d'aller mettre une valeur dans cette textboxID et du coup évite aussi le doublon.

Si ok -->

Cordialement

Bonjour Dan,

Ton code marche.

J'ai un souci avec le code ENREGISTRER qui me renvoie des messages d'erreurs tel que souligné ici https://forum.excel-pratique.com/excel/enregistrer-des-donnees-sur-une-feuille-excel-174621:

Cordialement.

J'ai un souci avec le code ENREGISTRER qui me renvoie des messages d'erreurs tel que souligné ici https://forum.excel-pratique.com/excel/enregistrer-des-donnees-sur-une-feuille-excel-174621:

Autant continuer sur l'autre fil

cordialement

Message compris Dan.

Comme souligné le code du bouton de commande génère des erreurs.

Comment les résoudre ?

NB: Je viens de créer un bouton de cmd Ajout Nouveau.

Pourriez vous m'indiquer comment dois je programmer son code ?

Cordialement ?