MsgBox en excel

02/07/2007 - 18:14 por Beneco | Informe spam
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

Preguntas similare

Leer las respuestas

#1 JJGarcia
02/07/2007 - 21:08 | Informe spam
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
Respuesta Responder a este mensaje
#2 Beneco
05/07/2007 - 06:20 | Informe spam
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


Respuesta Responder a este mensaje
#3 L. Garcia
05/07/2007 - 09:20 | Informe spam
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" (Nospy).> 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
>
>
Respuesta Responder a este mensaje
#4 Juan M
05/07/2007 - 09:51 | Informe spam
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
>
>




Respuesta Responder a este mensaje
#5 L. Garcia
05/07/2007 - 14:41 | Informe spam
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
>> >
>> >
>
>


Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida