2 métodos sencillos para evitar valores duplicados en una columna en su Excel

Si desea evitar ingresar valores duplicados en una columna en Excel, puede consultar este artículo. Aquí te compartiremos 2 enfoques sencillos.

A veces, cuando edita una hoja de cálculo de Excel, es posible que desee asegurarse de que los datos de una columna sean únicos, es decir, evitar valores duplicados en una columna. Exige que Excel le avise automáticamente cada vez que ingrese valores duplicados en una columna. A continuación, te compartiremos 2 medios rápidos para conseguirlo.

Método 1: Prevención mediante "Validación de datos"

1. En primer lugar, seleccione todas las celdas de una columna específica, como "Columna A".
2. Luego, vaya a la pestaña "Datos" y haga clic en el botón "Validación de datos" en el grupo "Herramientas de datos".
3. A continuación, en el cuadro de diálogo emergente, en la pestaña "Configuración", seleccione la opción "Personalizado" de la lista desplegable de "Permitir".
4. Después de eso, ingrese la siguiente fórmula en el campo "Fórmula".

= COUNTIF ($ A $ 1: $ A $ 20, A1) = 1

5. Más tarde, cambie a la pestaña "Alerta de error" en el cuadro de diálogo actual.
6. Posteriormente, puede personalizar un mensaje de error según sus necesidades, como especificar "Valores duplicados" como título del error y "¡El valor se ingresó en la misma columna!" como mensaje de error.
7. Finalmente, haga clic en "Aceptar".
8. Ahora puedes probarlo.

• En primer lugar, ingrese un valor en la celda A1.
• Luego, ingrese el mismo valor en la celda A2.
• De inmediato, recibirá el mensaje de error, como la siguiente captura de pantalla.

Método 2: prevenir con Excel VBA

1. Para empezar, active el editor de Excel VBA con referencia a "Cómo ejecutar código VBA en su Excel".
2. Luego, ingrese el siguiente código en el proyecto de una hoja, como "Hoja 1 (Hoja 1)"

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim strTargetColumn As String
   Dim nTargetRow As Integer
   Dim nLastRow As Integer
   Dim strMsg As String

   strTargetColumn = Split(Target.Address(, False), "$")(0)
   nTargetRow = Split(Target.Address(, False), "$")(1)
   nLastRow = ActiveSheet.Range(strTargetColumn & ActiveSheet.Rows.Count).End(xlUp).Row

   For nRow = 1 To nLastRow
       If nRow <> nTargetRow Then
          If ActiveSheet.Range(strTargetColumn & nRow).Value = Target.Value Then
             strMsg = "The value has been entered in the same column!"
             MsgBox strMsg, vbExclamation + vbOKOnly, "Duplicate Values"
             Target.Select
             Exit For
          End If
       End If
   Next
End Sub

3. Desde entonces, cada vez que ingrese un valor en cualquier celda, sin importar en ninguna columna, la macro verificará automáticamente los otros valores en la misma columna. Si encuentra los mismos valores, recibirá una alerta, como se muestra en la siguiente figura.

Comparación

Recupere valiosos datos de Excel

Es cierto que Excel es propenso a fallar. Y cada vez que se bloquea, el archivo de Excel abierto actualmente puede corromperse como una brisa. Por lo tanto, para evitar la pérdida de datos valiosos de Excel, no solo debe realizar una copia de seguridad de ellos de forma regular, sino que también debe obtener un notable recuperación xls herramienta, como DataNumen Excel Repair. Será útil en caso de daños graves en los datos de Excel.

Introducción del autor:

Shirley Zhang es experta en recuperación de datos en DataNumen, Inc., que es el líder mundial en tecnologías de recuperación de datos, incluyendo mdf dañado y productos de software de reparación de Outlook. Para más información visite www.datanumen.com