MsgBox en excel

Hola:

Esta claro que me gusta complicarme la vida ;-))) Me apunto tu solucion.

Saludos


"Juan M" escribió en el mensaje
news:#
> Hola,
>
> o esta otra (con los rangos de L. García)
>
> =CONTAR.SI($A$4:A4;A4)=1
>
> Un saludo,
> Juan
>
> "L. Garcia" escribió
> > Hola:
> >
> > Se puede hacer de varias formas, pero si no quieres usar 'macros' prueba
> > esto a ver si te puede servir:
> >
> > Suponemos el rango de entrada de datos 'no repetidos' es de A4:A20, lo
> > seleccionas todo y pulsas sobre el menú Datos|Validación.
> >
> > En la pestaña Configuración, en el combo Permitir seleccionas
> > 'Personalizada':
> >
> > Y en la caja de texto Fórmula escribes lo siguiente:
> >
> >
=Y(ESNOD(BUSCARV(A4;$A$3:A3;1;FALSO));ESNOD(BUSCARV(A4;A5:$A$20;1;FALSO)))
> >
> > Luego, en la pestaña 'Mensaje de Error', puedes 'experimentar' para
> > cambiar
> > el mensaje que quieres que se muestre cuando el valor sea repetido.
> >
> > Espero que te sirva.
> >
> > Saludos
> >
> > "Beneco" escribió en...
> >> Hola jj disculpa por no ser màs espècifico el còdigo que me colocas es
> > algo
> >> muy parecido a lo que quiero: Por ejemplo:
> >>
> >> desde la Fila A1 hasta A20, estoy ingresando registros Ejemplo: Casa,
> > Carro,
> >> finca etc.
> >> Si por algùn motivo ingresar cualquiera de los antes mencionados me
> >> produjera el mensaje de alerta, avisandome que èste registro ya existe.
> >>
> >>
> >>
> >>
> >> Beneco
> >>
> >>
> >> "JJGarcia" escribió:
> >>
> >> > On 2 jul, 09:14, Beneco (Nospy).> wrote:
> >> > > Muy buenas a todos, cordial saludos:
> >> > > Tengo una plantilla en excel 2000 donde tengo que ingresar una gran
> > cantidad
> >> > > de informaciòn.
> >> > > Lo que quiero hacer es lo sgte:
> >> > > Si al digitar un registro que ya digite me salga un Msgbox que
diga
> > mas o
> >> > > menos "Este registro ya existe"
> >> > > Beneco
> >> >
> >> > Hola Beneco NoSpy,
> >> > Lo que comentas es muy 'por encima', no proporcionas datos de
> >> > ninguna indole o algo que se le parezca, por lo pronto revisa esta
> >> > direccion
> >> >
> >> > http://www.cpearson.com/excel/events.htm
> >> >
> >> > este es un ejemplo de evento generado en el cambio de un valor en una
> >> > celda especifica
> >> > Private Sub Worksheet_Change(ByVal Target As Range)
> >> > If Target.Address = "$A$1" Then
> >> > MsgBox "Mensaje aparece"
> >> > End If
> >> > End Sub
> >> >
> >> > Saludos, JJGarcia
> >> >
> >> >
> >
> >
>
>