aviso de coincidencia

hola (...), ?????

En una hoja de excel cuando pongo un valor en una celda
me avise que en otra celda hay el mismo valor y a que corresponde (seria la celda contigua).
Por ejemplo
Pongo el valor 1234 y me avisa que este valor ya existe y en la celda contigua pone Pepito...

1) pones el valor 1234...
=> en donde lo pondrias exactamente ??? (hoja, rango, libro, ...)

2) te avisa que ya existe
=> en donde "lo encontro" exactamente ??? (hoja, rango, libro, ...)

3) despues pone "Pepito"
=> puede ser "Jacinto" o cualquier otro texto ???, no ?... por que no ???
aahhhh, ya lo veo, porque debe ser el dato que esta en la celda contigua (pero... contigua de cual celda ???)

saludos,
hector.

On Tue, 11 Aug 2009 14:28:13 -0500, "Héctor Miguel"
wrote:

hola (...), ?????

En una hoja de excel cuando pongo un valor en una celda
me avise que en otra celda hay el mismo valor y a que corresponde (seria la celda contigua).
Por ejemplo
Pongo el valor 1234 y me avisa que este valor ya existe y en la celda contigua pone Pepito...

1) pones el valor 1234...
=> en donde lo pondrias exactamente ??? (hoja, rango, libro, ...)

2) te avisa que ya existe
=> en donde "lo encontro" exactamente ??? (hoja, rango, libro, ...)

3) despues pone "Pepito"
=> puede ser "Jacinto" o cualquier otro texto ???, no ?... por que no ???
aahhhh, ya lo veo, porque debe ser el dato que esta en la celda contigua (pero... contigua de cual celda ???)

Veamos, una lista
2 Columnas A y B
En A Numeros
En B Nombres
Celdas contiguas

Si en un momento repito un numero, quiero que me avise que el numero
ya existe y en la celda contigua pone el nombre correspondiente a este
numero.

Esta claro? si no es asi dimelo.

Gracias por el interes
Saludos

hola (...), ?????

Veamos, una lista 2 Columnas A y B
En A Numeros. En B Nombres. Celdas contiguas

Si en un momento repito un numero, quiero que me avise que el numero ya existe
y en la celda contigua pone el nombre correspondiente a este numero.

Esta claro? si no es asi dimelo.

op1: asumiendo que es el usuario quien hace "entrada directa" de los datos en las celdas (NO macros y NO copy/paste)
puedes evitar la entrada duplicada usando reglas de validacion (p.e) para la columna A +/- como sigue:
a) selecciona toda la columna (A)
b) ve a (menu:) datos / validacion / => personalizada, y aplica una formula +/- como la siguiente: =contar.si(a:a,a1)<2
c) puedes aprovechar los apartados de mensaje (entrante y de error) para informar al usuario... lo necesario (?)

op2: si quieres que en la celda contigua "se ponga" el dato correspondiente a la entrada de un dato duplicado (?)
a) la propuesta anterior ya no te seria de mucha utilidad :-((
b) tendrias que usar macros, concretamente los del modulo de codigo de esa hoja y el evento _change

por donde prefieres buscar lo que consideres la mejor alternativa ?

saludos,
hector.

__ OP __

En una hoja de excel cuando pongo un valor en una celda
me avise que en otra celda hay el mismo valor y a que corresponde (seria la celda contigua).
Por ejemplo
Pongo el valor 1234 y me avisa que este valor ya existe y en la celda contigua pone Pepito...

1) pones el valor 1234...
=> en donde lo pondrias exactamente ??? (hoja, rango, libro, ...)

2) te avisa que ya existe
=> en donde "lo encontro" exactamente ??? (hoja, rango, libro, ...)

3) despues pone "Pepito"
=> puede ser "Jacinto" o cualquier otro texto ???, no ?... por que no ???
aahhhh, ya lo veo, porque debe ser el dato que esta en la celda contigua (pero... contigua de cual celda ???)

On Tue, 11 Aug 2009 19:47:51 -0500, "Héctor Miguel"
wrote:

op2: si quieres que en la celda contigua "se ponga" el dato correspondiente a la entrada de un dato duplicado (?)
a) la propuesta anterior ya no te seria de mucha utilidad :-((
b) tendrias que usar macros, concretamente los del modulo de codigo de esa hoja y el evento _change

por donde prefieres buscar lo que consideres la mejor alternativa ?

Poe sencillez prefiero esta segunda alternativa, pero mas sencillo, no
es necesaria ninguna automatizacion, solo que me avise que ya existe,
aunque no informe del valor de la celda contigua

__ OP __

En una hoja de excel cuando pongo un valor en una celda
me avise que en otra celda hay el mismo valor y a que corresponde (seria la celda contigua).
Por ejemplo
Pongo el valor 1234 y me avisa que este valor ya existe y en la celda contigua pone Pepito...

1) pones el valor 1234...
=> en donde lo pondrias exactamente ??? (hoja, rango, libro, ...)

en una celda, la siguiente a la ultima ocupada, la hoja solo tiene 2
columnas

2) te avisa que ya existe
=> en donde "lo encontro" exactamente ??? (hoja, rango, libro, ...)

Solo avise, estara en otra celda.

3) despues pone "Pepito"
=> puede ser "Jacinto" o cualquier otro texto ???, no ?... por que no ???
aahhhh, ya lo veo, porque debe ser el dato que esta en la celda contigua (pero... contigua de cual celda ???)

Si, puede ser cualquier texto, que estara en la celda a la derecha del
codigo coincidente.

Es una hoja muy sencilla, con dos (a lo sumo 3) columnas.

Saludos y gracias

hola (...), ?????

op2: si quieres que en la celda contigua "se ponga" el dato correspondiente a la entrada de un dato duplicado (?)
a) la propuesta anterior ya no te seria de mucha utilidad :-((
b) tendrias que usar macros, concretamente los del modulo de codigo de esa hoja y el evento _change

por donde prefieres buscar lo que consideres la mejor alternativa ?

Poe sencillez prefiero esta segunda alternativa, pero mas sencillo, no es necesaria ninguna automatizacion
solo que me avise que ya existe, aunque no informe del valor de la celda contigua ...

copia/pega (o escribe) los siguientes procedimientos en el modulo de codigo de "esa" hoja:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then ActiveCell.Select
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then Exit Sub
If Evaluate("countif(a:a," & Target.Address & ")>1") Then
With Cells.Find(Target, Target, xlValues, xlWhole)
MsgBox Target & " ya esta registrado en " & .Address(0, 0) & " para: " & .Offset(, 1)
Application.Undo
End With
End If
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.