Macro para excel
Hola, tengo
una inquietud, me gustaría saber cómo hago para validar que no se repita un número
de identificación, tengo dos hojas en la hoja inscripciones en la celda c6
dígito la cedula, quiero que me verifique en la hoja Basededatos en
la columna c que existe o no la cedula y que me
mande un mensaje que existe y no me deje seguir llenando datos, soy nueva en
esto así que le agradecería si me colaborara.
1 respuesta
Respuesta de Elsa Matilde
1
Entrá al Editor de macros presionando juntas las teclas Alt y F11.
Seleccioná con doble clic el objeto HOJA Inscripciones (en panel a tu izquierda)
Allí copiá esto:
Private Sub Worksheet_Change(ByVal Target As Range)
'x Elsamatilde
'solo se controla lo ingresado en C6
If Target.Address <> "$C$6" Then Exit Sub
'busco ese dato en hoja Base, col C
Set busco = Sheets("Basededatos").Range("C:C").Find(Target.Value, LookIn:=xlValues, lookat:=xlWhole)
'si lo encuentra borra el contenido de C6 y sigue quedándose allí
If Not busco Is Nothing Then
'evito que se vuelva a ejecutar el evento Change
Application.EnableEvents = False
Target.Value = ""
Target.Select
Application.EnableEvents = True
End If
End SubEsto hará que si ingresás en C6 un valor que ya existe se vuelve a limpiar la celda quedándose el cursor allí.
Sdos y NO olvides finalizar la consulta.
