Wie erlaube ich nur eindeutige Werte in Excel?
Wenn Sie nur eindeutige Werte in eine Spalte des Arbeitsblatts eingeben und die Duplikate vermeiden möchten, werden in diesem Artikel einige schnelle Tricks vorgestellt, mit denen Sie diese Aufgabe lösen können.
Erlauben Sie nur eindeutige Werte im Arbeitsblatt mit Datenüberprüfung
Erlauben Sie nur eindeutige Werte im Arbeitsblatt mit VBA-Code
Lassen Sie mit Kutools for Excel nur eindeutige Werte im Arbeitsblatt zu
Erlauben Sie nur eindeutige Werte im Arbeitsblatt mit Datenüberprüfung
Tatsächlich ist die Datenvalidierung Die Funktion von Excel kann Ihnen bei der Lösung dieses Problems helfen. Gehen Sie dazu wie folgt vor:
1. Wählen Sie die Zellen oder Spalten aus, für die nur eindeutige Werte eingegeben werden sollen, und klicken Sie dann auf Datum > Datenvalidierung > Datenvalidierung, siehe Screenshot:
2. In dem Datenvalidierung Im Dialogfeld führen Sie bitte die folgenden Vorgänge aus:
(1.) Klicken Sie auf Einstellungen Tab;
(2.) Unter dem Erlauben Dropdown-Liste, wählen Sie Maßgeschneidert;
(3.) Und geben Sie diese Formel ein: = COUNTIF ($ E: $ E, E1) <2 (E ist die Spalte, in der Sie nur eindeutige Werte zulassen möchten. E1 ist die erste Zelle der Spalte, die Sie verwenden möchten Formel Textfeld ein.
3. Und dann klick OK Wenn Sie von nun an einen doppelten Wert in die von Ihnen festgelegte Spalte eingeben, wird eine Warnmeldung angezeigt, die Sie daran erinnert (siehe Abbildung):
Erlauben Sie nur eindeutige Werte im Arbeitsblatt mit VBA-Code
Wenn Sie sich für den VBA-Code interessieren, kann Ihnen der folgende Code auch einen Gefallen tun.
1. Klicken Sie mit der rechten Maustaste auf die Registerkarte "Blatt", die nur negative Zahlen zulassen soll, und wählen Sie Code anzeigen aus dem Kontextmenü in der herausgesprungenen Microsoft Visual Basic für Applikationen Fenster, bitte kopieren Sie den folgenden Code und fügen Sie ihn in das Feld ein Modul:
VBA-Code: Nur eindeutige Werte im Arbeitsblatt zulassen:
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
Note: Im obigen Code ist die A1: A1000 ist die Spaltenzelle, die Sie duplizieren möchten.
2. Speichern und schließen Sie diesen Code. Wenn Sie jetzt doppelte Werte in Zelle A1: A1000 eingeben, wird eine Warnmeldung angezeigt, die Sie daran erinnert, dass doppelte Einträge nicht zulässig sind. Siehe Screenshot:
3. Dann klick OK Schaltfläche wird der doppelte Wert gelöscht.
Lassen Sie mit Kutools for Excel nur eindeutige Werte im Arbeitsblatt zu
Die beiden oben genannten Methoden können nur dann doppelte Einträge in einer Spalte verhindern, wenn Sie dies getan haben Kutools for Excel, seine Duplizieren verhindern Mit dem Dienstprogramm können Sie schnell verhindern, dass sich Duplikate in einer Reihe von Zellen und nur in einer Spalte oder Zeile befinden.
| Kutools for Excel : Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen. |
Nach der Installation Kutools for ExcelBitte gehen Sie wie folgt vor:
1. Wählen Sie die Spalte oder den Zellbereich aus, in dem Sie doppelte Werte vermeiden möchten, aber nur eindeutige Daten zulassen möchten.
2. Dann klick Kutoolen > Tippfehler verhindern > Duplizieren verhindern, siehe Screenshot:
3. Und eine Warnmeldung wird angezeigt, um Sie daran zu erinnern Datenvalidierung wird entfernt, wenn diese Funktion angewendet wird, siehe Screenshot:
4. Dann klick Ja Klicken Sie auf die Schaltfläche, um fortzufahren, und ein weiteres Eingabeaufforderungsfeld wird angezeigt, um Sie daran zu erinnern, auf welche Zellen diese Funktion angewendet wurde. Siehe Screenshot:
5. Und dann klick OK Wenn Sie jetzt einige doppelte Daten im Bereich A1: D15 eingeben, wird ein Eingabeaufforderungsfeld angezeigt, das Sie daran erinnert, dass die doppelten Daten ungültig sind. Sie müssen nur den eindeutigen Wert eingeben. Siehe Screenshot:
Mehr als 200 Funktionen können Ihre Arbeit effizient erledigen Laden Sie Kutools for Excel kostenlos herunter.
Demo: Erlauben Sie mit Kutools for Excel nur eindeutige Werte im Arbeitsblatt
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
