Comment n'autoriser que des valeurs uniques dans Excel ?
Si vous souhaitez conserver uniquement des valeurs uniques dans une colonne de votre feuille de calcul et empêcher les doublons, cet article vous présentera quelques astuces rapides pour gérer cette tâche.
N'autoriser que des valeurs uniques dans la feuille de calcul avec la validation des données
N'autoriser que des valeurs uniques dans la feuille de calcul avec Kutools pour Excel
N'autoriser que des valeurs uniques dans la feuille de calcul avec le code VBA
N'autoriser que des valeurs uniques dans la feuille de calcul avec la validation des données
En fait, la fonction Validation des données d'Excel peut vous aider à résoudre ce problème. Veuillez procéder comme suit :
1. Sélectionnez les cellules ou la colonne où vous souhaitez n'entrer que des valeurs uniques, puis cliquez sur Données > Validation des données > Validation des données, voir capture d'écran :
2. Dans la boîte de dialogue Validation des données, veuillez effectuer les opérations suivantes :
(1.) Cliquez sur l'onglet Paramètres ;
(2.) Sous la liste déroulante Autoriser, choisissez Personnalisé ;
(3.) Et entrez cette formule : =NB.SI($E:$E;E1)<2 (E est la colonne où vous souhaitez n'autoriser que des valeurs uniques, E1 est la première cellule de la colonne que vous souhaitez utiliser) dans la zone de texte Formule.
3. Puis cliquez sur le bouton OK. À partir de maintenant, lorsque vous entrez une valeur en double dans la colonne spécifique que vous avez définie, un message d'avertissement apparaîtra pour vous avertir, voir capture d'écran :
N'autoriser que des valeurs uniques dans la feuille de calcul avec Kutools pour Excel
Les deux méthodes ci-dessus ne peuvent empêcher les entrées en double que dans une seule colonne. Si vous avez Kutools pour Excel, son utilitaire Empêcher les doublons peut vous aider à rapidement prévenir les doublons dans une plage de cellules ainsi que dans une seule colonne ou ligne.
Après avoir installé Kutools pour Excel, veuillez procéder comme suit :
1. Sélectionnez la colonne ou la plage de cellules où vous souhaitez empêcher les valeurs en double mais autoriser uniquement des données uniques.
2. Ensuite, cliquez sur Kutools > Limite de saisie > Empêcher les doublons, voir capture d'écran :
3. Un message d'avertissement apparaîtra pour vous informer que la Validation des données sera supprimée si vous appliquez cette fonctionnalité, voir capture d'écran :
4. Cliquez ensuite sur le bouton Oui pour continuer, et une autre boîte de dialogue apparaîtra pour vous indiquer quelles cellules ont été affectées par cette fonctionnalité. Voir capture d'écran :
5. Cliquez ensuite sur le bouton OK. Maintenant, lorsque vous entrez des données en double dans la plage A1:D15, une boîte de dialogue s'affiche pour vous rappeler que les données en double ne sont pas valides, vous devez entrer uniquement des valeurs uniques. Voir capture d'écran :
Plus de 300 fonctions peuvent rendre votre travail plus efficace, vous pouvez télécharger Kutools pour Excel pour une version d'essai gratuite.
N'autoriser que des valeurs uniques dans la feuille de calcul avec le code VBA
Si vous êtes intéressé par le code VBA, le code suivant peut également vous être utile.
1. Faites un clic droit sur l'onglet de la feuille où vous souhaitez n'autoriser que des nombres négatifs, puis choisissez Afficher le code dans le menu contextuel. Dans la fenêtre Microsoft Visual Basic for Applications qui s'affiche, copiez et collez le code suivant dans le Module vide :
Code VBA : N'autoriser que des valeurs uniques dans la feuille de calcul :
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160829
Dim xRg As Range, iLong, fLong As Long
If Not Intersect(Target, Me.[A1:A1000]) Is Nothing Then
Application.EnableEvents = False
For Each xRg In Target
With xRg
If (.Value <> "") Then
If WorksheetFunction.CountIf(Me.[A:A], .Value) > 1 Then
iLong = .Interior.ColorIndex
fLong = .Font.ColorIndex
.Interior.ColorIndex = 3
.Font.ColorIndex = 6
MsgBox "Duplicate Entry !", vbCritical, "Kutools for Excel"
.ClearContents
.Interior.ColorIndex = iLong
.Font.ColorIndex = fLong
End If
End If
End With
Next
Application.EnableEvents = True
End If
End Sub
Remarque : Dans le code ci-dessus, A1:A1000 correspond aux cellules de la colonne où vous souhaitez éviter les doublons.
2. Ensuite, enregistrez et fermez ce code. Maintenant, lorsque vous entrez des valeurs en double dans les cellules A1:A1000, un message d'avertissement s'affichera pour vous rappeler que les entrées en double ne sont pas autorisées, voir capture d'écran :
3. Cliquez ensuite sur le bouton OK, la valeur en double sera supprimée.
Meilleurs outils de productivité pour Office
Boostez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité sans précédent. Kutools pour Excel propose plus de300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office, et facilite grandement votre travail
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de50 %, et réduit des centaines de clics de souris pour vous chaque jour !