Para kl

Asi era, tenias nuevamente razón, las comillas. He vuelto a pegar la macro y
funciona estupendamente.

Muchas Gracias.Dónde podria bajarme macros o algun sitio para
aprender.??????

Gracias de nuevo amigo XL







"KL" escribió en el mensaje
news:OYnjg5P%

Tino,

Creo q acabo de caer: ? no estaras pegando el macro junto con las comillas
q le habias anadido al principio y final? Si es asi, quitalas. El macro
debe leer exactamente asi:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim rng As Range
Set rng = Intersect(Range("A1:A2"), Target)
If Not rng Is Nothing And Range("A1") < Range("A2") Then _
MsgBox "El valor de la celda A2 es mayor al de la A1",
vbInformation
End Sub

De todas formas es facil de saber si hay algun error en el macro: si al
pegarlo a la ventana q te habia indicado se pone rojo es q hay errores en
el codigo.

a ver que tal ahora.

KL
"Tino" wrote in message
news:cs4a9v$eva$

Pues estimado amigo, he seguido paso por paso todas tus indicaciones y no
me sale, quizas sea a partir del punto 5 que despues de pegar la macro en
la ventana no se muy bien como ir a visualizar otra vez la hoja. He
podido visualizar la hoja, introduzco valores en A1 y A2 y no ocurre
nada. Tampoco me pide que se va abrir una macro ni nada parecido, puse en
nivel de seguridad mediano como tu me indicabas pero no me sale.
Pienso que a lo mejor sería conveniente empezar por una macro mas
sencilla? Te parece?.

Gracias de nuevo Saludos




"KL" escribió en el mensaje
news:uyLWOeP%

Hola Tino,

"Tino" wrote in message...

la verdad es que me pareces un genio del Excel...

!nada mas lejos de la realidad!

Primero copio, una solución que tu distes, que creo que es una macro
"Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim rng As Range
Set rng = Intersect(Range("A1:A2"), Target)
If Not rng Is Nothing And Range("A1") < Range("A2") Then _
MsgBox "El valor de la celda A2 es mayor al de la A1",
vbInformation
End Sub"

si efectivamente es un macro asignado a un evento, en este caso
concretamente al evento de intoducir cambios en la hoja en cuyo modulo
se coloque el macro.

Mi pregunta es como se introduce todos estos datos?.
o mandame un link donde pueda aprender a introducir datos .

Paso a paso:

1) Visualiza la hoja a la q quires aplicar el macro.
2) Busca la pestana con el nombre de la hoja (en la parte inferior de la
ventana de Excel)
3) Apunta con el cursor de tu raton sobre la pestana y haz clic con el
boton derecho.
4) Del menu q aparecera a continuacion elige Ver Codigo. Se abrira el
Editor de Visual Basic con varias ventanas.
5) Pega el macro copiado en la ventana mas grande a mano derecha
6) Vuelve a visiulizar la hoja de calculo
7) Prueba introducir datos en las celdas A1 y A2
8) Si el macro no funciona, guarda los cambios, cierra el fichero y
vuelve a abrirlo. Al abrir el fichero debera aparecer una ventana
preguntando si deseas habilitar los macros. Asegurate de q los macros
esten habilitados. Si el fichero se abre sin q se te prugunte por los
macros, ve al menu Herramientas>Macro>Seguridad y elige el nivel
Intermedio. Luego cierra el fichero y vuelve a abrirlo.

Saludos,
KL

Tino,

Revisa este enlace: http://www.excelsp.com/faqs01.htm

como lectura mas fundamental te recomendaria el primer titulo de este
enlace:
http://www.casadellibro.com/fichas/...HN,00.html

y tambien si manejas el ingles aqui encontraras una lista bastante completa
de webs a estudiar:
http://www.excelsp.com/enlaces.htm

incluso si no hablas ingles te queda la opcion de usar los traductores de
las pagibnas web online como el de Google.es.

Saludos,
KL


"Tino" wrote in message
news:cs4cgu$o1d$

Asi era, tenias nuevamente razón, las comillas. He vuelto a pegar la macro
y funciona estupendamente.

Muchas Gracias.Dónde podria bajarme macros o algun sitio para
aprender.??????

Gracias de nuevo amigo XL







"KL" escribió en el mensaje
news:OYnjg5P%

Tino,

Creo q acabo de caer: ? no estaras pegando el macro junto con las
comillas q le habias anadido al principio y final? Si es asi, quitalas.
El macro debe leer exactamente asi:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim rng As Range
Set rng = Intersect(Range("A1:A2"), Target)
If Not rng Is Nothing And Range("A1") < Range("A2") Then _
MsgBox "El valor de la celda A2 es mayor al de la A1",
vbInformation
End Sub

De todas formas es facil de saber si hay algun error en el macro: si al
pegarlo a la ventana q te habia indicado se pone rojo es q hay errores en
el codigo.

a ver que tal ahora.

KL
"Tino" wrote in message
news:cs4a9v$eva$

Pues estimado amigo, he seguido paso por paso todas tus indicaciones y
no me sale, quizas sea a partir del punto 5 que despues de pegar la
macro en la ventana no se muy bien como ir a visualizar otra vez la
hoja. He podido visualizar la hoja, introduzco valores en A1 y A2 y no
ocurre nada. Tampoco me pide que se va abrir una macro ni nada parecido,
puse en nivel de seguridad mediano como tu me indicabas pero no me sale.
Pienso que a lo mejor sería conveniente empezar por una macro mas
sencilla? Te parece?.

Gracias de nuevo Saludos




"KL" escribió en el mensaje
news:uyLWOeP%

Hola Tino,

"Tino" wrote in message...

la verdad es que me pareces un genio del Excel...

!nada mas lejos de la realidad!

Primero copio, una solución que tu distes, que creo que es una macro
"Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim rng As Range
Set rng = Intersect(Range("A1:A2"), Target)
If Not rng Is Nothing And Range("A1") < Range("A2") Then _
MsgBox "El valor de la celda A2 es mayor al de la A1",
vbInformation
End Sub"

si efectivamente es un macro asignado a un evento, en este caso
concretamente al evento de intoducir cambios en la hoja en cuyo modulo
se coloque el macro.

Mi pregunta es como se introduce todos estos datos?.
o mandame un link donde pueda aprender a introducir datos .

Paso a paso:

1) Visualiza la hoja a la q quires aplicar el macro.
2) Busca la pestana con el nombre de la hoja (en la parte inferior de
la ventana de Excel)
3) Apunta con el cursor de tu raton sobre la pestana y haz clic con el
boton derecho.
4) Del menu q aparecera a continuacion elige Ver Codigo. Se abrira el
Editor de Visual Basic con varias ventanas.
5) Pega el macro copiado en la ventana mas grande a mano derecha
6) Vuelve a visiulizar la hoja de calculo
7) Prueba introducir datos en las celdas A1 y A2
8) Si el macro no funciona, guarda los cambios, cierra el fichero y
vuelve a abrirlo. Al abrir el fichero debera aparecer una ventana
preguntando si deseas habilitar los macros. Asegurate de q los macros
esten habilitados. Si el fichero se abre sin q se te prugunte por los
macros, ve al menu Herramientas>Macro>Seguridad y elige el nivel
Intermedio. Luego cierra el fichero y vuelve a abrirlo.

Saludos,
KL

Hola KL he visto en esta dirección que has recomendado:
http://www.excelsp.com/faqs01.htm
que se pueden hacer parpadear las celdas, he bajado el ejemplo y funciona
perfectamente, sin embargo si trato de abrir una hoja de Excel y hacerlo voy
a Formato, Estilo y cuando quiero poner Parpadeo, resulta que no tengo esa
opción. ¿Cómo es posible que en el ejemplo que bajo de la página lo tengo y
en mi hoja cuando la lanzo no la tengo, podías decirme como poner esa
opción? Gracias KL.
Como verás ya no paro de mirar cosas, esto de Excel engancha, la pena es que
no tengo tiempo.
Un saludo
Josema



"KL" escribió en el mensaje
news:ejoRgRQ%

Tino,

Revisa este enlace: http://www.excelsp.com/faqs01.htm

como lectura mas fundamental te recomendaria el primer titulo de este
enlace:
http://www.casadellibro.com/fichas/...HN,00.html

y tambien si manejas el ingles aqui encontraras una lista bastante
completa de webs a estudiar:
http://www.excelsp.com/enlaces.htm

incluso si no hablas ingles te queda la opcion de usar los traductores de
las pagibnas web online como el de Google.es.

Saludos,
KL


"Tino" wrote in message
news:cs4cgu$o1d$

Asi era, tenias nuevamente razón, las comillas. He vuelto a pegar la
macro y funciona estupendamente.

Muchas Gracias.Dónde podria bajarme macros o algun sitio para
aprender.??????

Gracias de nuevo amigo XL







"KL" escribió en el mensaje
news:OYnjg5P%

Tino,

Creo q acabo de caer: ? no estaras pegando el macro junto con las
comillas q le habias anadido al principio y final? Si es asi, quitalas.
El macro debe leer exactamente asi:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim rng As Range
Set rng = Intersect(Range("A1:A2"), Target)
If Not rng Is Nothing And Range("A1") < Range("A2") Then _
MsgBox "El valor de la celda A2 es mayor al de la A1",
vbInformation
End Sub

De todas formas es facil de saber si hay algun error en el macro: si al
pegarlo a la ventana q te habia indicado se pone rojo es q hay errores
en el codigo.

a ver que tal ahora.

KL
"Tino" wrote in message
news:cs4a9v$eva$

Pues estimado amigo, he seguido paso por paso todas tus indicaciones y
no me sale, quizas sea a partir del punto 5 que despues de pegar la
macro en la ventana no se muy bien como ir a visualizar otra vez la
hoja. He podido visualizar la hoja, introduzco valores en A1 y A2 y no
ocurre nada. Tampoco me pide que se va abrir una macro ni nada
parecido, puse en nivel de seguridad mediano como tu me indicabas pero
no me sale.
Pienso que a lo mejor sería conveniente empezar por una macro mas
sencilla? Te parece?.

Gracias de nuevo Saludos




"KL" escribió en el mensaje
news:uyLWOeP%

Hola Tino,

"Tino" wrote in message...

la verdad es que me pareces un genio del Excel...

!nada mas lejos de la realidad!

Primero copio, una solución que tu distes, que creo que es una macro
"Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim rng As Range
Set rng = Intersect(Range("A1:A2"), Target)
If Not rng Is Nothing And Range("A1") < Range("A2") Then _
MsgBox "El valor de la celda A2 es mayor al de la A1",
vbInformation
End Sub"

si efectivamente es un macro asignado a un evento, en este caso
concretamente al evento de intoducir cambios en la hoja en cuyo modulo
se coloque el macro.

Mi pregunta es como se introduce todos estos datos?.
o mandame un link donde pueda aprender a introducir datos .

Paso a paso:

1) Visualiza la hoja a la q quires aplicar el macro.
2) Busca la pestana con el nombre de la hoja (en la parte inferior de
la ventana de Excel)
3) Apunta con el cursor de tu raton sobre la pestana y haz clic con el
boton derecho.
4) Del menu q aparecera a continuacion elige Ver Codigo. Se abrira el
Editor de Visual Basic con varias ventanas.
5) Pega el macro copiado en la ventana mas grande a mano derecha
6) Vuelve a visiulizar la hoja de calculo
7) Prueba introducir datos en las celdas A1 y A2
8) Si el macro no funciona, guarda los cambios, cierra el fichero y
vuelve a abrirlo. Al abrir el fichero debera aparecer una ventana
preguntando si deseas habilitar los macros. Asegurate de q los macros
esten habilitados. Si el fichero se abre sin q se te prugunte por los
macros, ve al menu Herramientas>Macro>Seguridad y elige el nivel
Intermedio. Luego cierra el fichero y vuelve a abrirlo.

Saludos,
KL

Josema,

"Josema" wrote in message...
...si trato de abrir una hoja de Excel y hacerlo voy

a Formato, Estilo y cuando quiero poner Parpadeo, resulta que no tengo esa
opción...

1) Vuelve al menu Formato>Estilo.
2) En el desplegable con nombres de formatos escripe directamente - Parpadeo
y se activara el boton Anadir
3) Pulsa el boton Anadir, luego Modificar y cambia el color de trama al
amarillo de la 4a fila. Pulsa Aceptar, Aceptar.
4) Ahora si q puedes seleccionar el estilo Parpadeo.

Saludos,
KL

Hola KL, efectivamente solo era poner en el desplegable Parpadeo y ya lo
admite. Luego puse el color amarillo, lo único que ahora se quedan las
casillas de color amarillo pero no parpadean, están fijas. ¿podrá
solucionarse?
Muchas gracias una vez más maestro KL
Josema