Come consentire solo valori univoci in Excel?

Se desideri mantenere solo i valori univoci immessi in una colonna del foglio di lavoro e impedire i duplicati, questo articolo introdurrà alcuni trucchi rapidi per affrontare questa attività.

Consenti solo valori univoci nel foglio di lavoro con la convalida dei dati

Consenti solo valori univoci nel foglio di lavoro con codice VBA

Consenti solo valori univoci nel foglio di lavoro con Kutools per Excel

Consenti solo valori univoci nel foglio di lavoro con la convalida dei dati

Infatti, la Convalida dati la funzione di Excel può aiutarti a risolvere questo problema, per favore fai come segue:

1. Seleziona le celle o la colonna in cui desideri inserire solo valori univoci, quindi fai clic su Dati > Convalida dati > Convalida dati, vedi screenshot:

2. Nel Convalida dati finestra di dialogo, eseguire le seguenti operazioni:

(1.) Fare clic su Impostazioni profilo scheda;

(2.) Sotto il Consentire elenco a discesa, scegliere Custom;

(3.) E inserisci questa formula: = CONTA.SE ($ E: $ E, E1) <2 (E è la colonna a cui vuoi consentire solo valori univoci, E1 è la prima cella della colonna che desideri utilizzare) nel file Formula casella di testo.

3. E poi clicca OK pulsante, d'ora in poi, quando inserisci un valore duplicato nella colonna specifica che hai impostato, verrà visualizzato un messaggio di avviso per ricordartelo, vedi screenshot:

Consenti solo valori univoci nel foglio di lavoro con codice VBA

Se sei interessato al codice VBA, anche il codice seguente può farti un favore.

1. Fare clic con il pulsante destro del mouse sulla scheda del foglio a cui si desidera consentire solo i numeri negativi e scegliere Visualizza codice dal menu contestuale, nel saltato fuori Microsoft Visual Basic, Applications Edition finestra, copia e incolla il seguente codice nello spazio vuoto Modulo:

Codice VBA: consente solo valori univoci nel foglio di lavoro:

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:: Nel codice sopra, il A1: A1000 sono le celle della colonna che vuoi evitare di duplicare.

2. Quindi salva e chiudi questo codice, ora, quando inserisci valori duplicati nella cella A1: A1000, viene visualizzato un messaggio di avviso per ricordarti che la voce duplicata non è consentita, vedi screenshot:

3. Quindi fare clic OK pulsante, il valore duplicato verrà eliminato.

Consenti solo valori univoci nel foglio di lavoro con Kutools per Excel

I due metodi precedenti solo possono impedire le voci duplicate in una colonna, se lo hai Kutools for Excel, suo Impedisci duplicati L'utilità può aiutarti a prevenire rapidamente la duplicazione in un intervallo di celle e solo una colonna o riga.

Dopo l'installazione Kutools for Excel, si prega di fare come segue:

1. Seleziona la colonna o l'intervallo di celle che desideri impedire i valori duplicati ma consentire solo dati univoci.

2. Quindi fare clic Kutools > Impedisci digitazione > Impedisci duplicati, vedi screenshot:

3. E verrà visualizzato un messaggio di avviso per ricordarti il ​​file Convalida dati verrà rimosso se si applica questa funzione, vedi screenshot:

4. Quindi fare clic Sì pulsante per continuare e viene visualizzata un'altra finestra di messaggio per ricordare a quali celle è stata applicata questa funzione. Vedi screenshot:

5. E poi clicca OK pulsante, ora, quando si immettono alcuni dati duplicati nell'intervallo A1: D15, viene visualizzata una finestra di messaggio per ricordare che i dati duplicati non sono validi, è necessario inserire solo il valore univoco. Vedi screenshot:

Più di 200 funzioni possono rendere il tuo lavoro efficiente, puoi scarica Kutools per Excel gratuitamente.

Demo: consente solo valori univoci nel foglio di lavoro con Kutools per Excel

---

I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

• Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
• Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
• Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
• Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
• Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
• Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
• Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
• Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
• Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.

Leggi di più... Download gratuito... Acquista... 

---

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

• Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
• Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
• Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!

Leggi di più... Download gratuito... Acquista...