Visual Basic para Aplicaciones - ayuda en excel

Life is soft - evento anual de software empresarial
 
Vista:

ayuda en excel

Publicado por maite (1 intervención) el 06/05/2004 11:57:40
hola
tengo una lista de clientes en excel y keria saber lo k tengo k hacer para k me muestre un mensaje de error al intentar introducir un nombre repetido
gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ayuda en excel

Publicado por J.Fernando (40 intervenciones) el 18/05/2004 16:49:08
Suponiendo que los nombres de los clientes estan en la columna A y la primera fila de esta columna tiene el rotulo "clientes" entonces agrega el siguiente código en el editor de VBA

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column <> 1 Then
Exit Sub
End If
Cuantos = WorksheetFunction.CountIf(Range("A2:A65536"), Target)
If Cuantos > 1 Then
MsgBox "El Registro ya Existe", vbOKOnly
Target.Select
Target.ClearContents
SendKeys "{F2}"
End If
End Sub

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:ayuda en excel

Publicado por _frany_ (36 intervenciones) el 21/05/2004 23:26:20
no me funciona estas seguro que funciona bien?
gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar