Teclas de desplazamiento

KL,
El disparo de la macro se debe originar al momento de seleccionar la
celda Al (por ejemplo), si ésta tuviera el valor mayor a cero desde
luego, de lo contrario que se cancele la macro.
Saludos.

KL escribió:

Alfredo,

creo q este es el mejor, solo tienes q darnos mas detalle como por ejemplo:
?en q momento quieres q se dispare el macro: en cuanto la celda se ponga en
0, al abrir o cerrar el fichero, al seleccionar alguna celda (o rango)
especifica, al hacer doble clic sobre la celda, al imprimir la hoja, etc.
etc?

Saludos,
KL

"Alfredo Sanchez Deveaux" wrote in message
news:

Alguien podria indicarme algun enlace de ejemplo(s) para realizar la
ejecucion de una macro si el valor de una celda es mayor a cero?
Gracias anticipadas por la ayuda.

Alfredo,
Prueba copiar uno de estos codigos al modulo de la hoja donde se encuentra
la celda.
Saludos,
KL

'--Inicio Codigo1
'El macro se dispara si el rango seleccionado
'contiene la celda A1 .
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell = Range("A1") And ActiveCell > 0 Then
Call MiMacro
End If
End Sub

Sub MiMacro()
MsgBox "!Hola! Aqui podria estar tu macro."
End Sub
'--Fin Codigo1

'--Inicio Codigo2
'El macro se dispara si solo la celda A1 esta seleccionada.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target = Range("A1") And Target > 0 Then
Call MiMacro
End If
End Sub

Sub MiMacro()
MsgBox "!Hola! Aqui podria estar tu macro."
End Sub
'--Fin Codigo2


"Alfredo Sanchez Deveaux" wrote in message
news:

KL,
El disparo de la macro se debe originar al momento de seleccionar la celda
Al (por ejemplo), si ésta tuviera el valor mayor a cero desde luego, de lo
contrario que se cancele la macro.
Saludos.

KL escribió:

Alfredo,

creo q este es el mejor, solo tienes q darnos mas detalle como por
ejemplo: ?en q momento quieres q se dispare el macro: en cuanto la celda
se ponga en 0, al abrir o cerrar el fichero, al seleccionar alguna celda
(o rango) especifica, al hacer doble clic sobre la celda, al imprimir la
hoja, etc. etc?

Saludos,
KL

"Alfredo Sanchez Deveaux" wrote in message
news:

Alguien podria indicarme algun enlace de ejemplo(s) para realizar la
ejecucion de una macro si el valor de una celda es mayor a cero?
Gracias anticipadas por la ayuda.

el comentario del primer codigo deberia decir:

'El macro se dispara si el rango seleccionado
'contiene la celda A1 y esta es activa.

KL

"KL" wrote in message
news:

Alfredo,
Prueba copiar uno de estos codigos al modulo de la hoja donde se encuentra
la celda.
Saludos,
KL

'--Inicio Codigo1
'El macro se dispara si el rango seleccionado
'contiene la celda A1 .
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell = Range("A1") And ActiveCell > 0 Then
Call MiMacro
End If
End Sub

Sub MiMacro()
MsgBox "!Hola! Aqui podria estar tu macro."
End Sub
'--Fin Codigo1

'--Inicio Codigo2
'El macro se dispara si solo la celda A1 esta seleccionada.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target = Range("A1") And Target > 0 Then
Call MiMacro
End If
End Sub

Sub MiMacro()
MsgBox "!Hola! Aqui podria estar tu macro."
End Sub
'--Fin Codigo2


"Alfredo Sanchez Deveaux" wrote in message
news:

KL,
El disparo de la macro se debe originar al momento de seleccionar la
celda Al (por ejemplo), si ésta tuviera el valor mayor a cero desde
luego, de lo contrario que se cancele la macro.
Saludos.

KL escribió:

Alfredo,

creo q este es el mejor, solo tienes q darnos mas detalle como por
ejemplo: ?en q momento quieres q se dispare el macro: en cuanto la celda
se ponga en 0, al abrir o cerrar el fichero, al seleccionar alguna celda
(o rango) especifica, al hacer doble clic sobre la celda, al imprimir la
hoja, etc. etc?

Saludos,
KL

"Alfredo Sanchez Deveaux" wrote in message
news:

Alguien podria indicarme algun enlace de ejemplo(s) para realizar la
ejecucion de una macro si el valor de una celda es mayor a cero?
Gracias anticipadas por la ayuda.

KL,
Es justo lo que necesitaba, maravilloso!
Gracias


KL escribió:

Alfredo,
Prueba copiar uno de estos codigos al modulo de la hoja donde se encuentra
la celda.
Saludos,
KL

'--Inicio Codigo1
'El macro se dispara si el rango seleccionado
'contiene la celda A1 .
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell = Range("A1") And ActiveCell > 0 Then
Call MiMacro
End If
End Sub

Sub MiMacro()
MsgBox "!Hola! Aqui podria estar tu macro."
End Sub
'--Fin Codigo1

'--Inicio Codigo2
'El macro se dispara si solo la celda A1 esta seleccionada.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target = Range("A1") And Target > 0 Then
Call MiMacro
End If
End Sub

Sub MiMacro()
MsgBox "!Hola! Aqui podria estar tu macro."
End Sub
'--Fin Codigo2


"Alfredo Sanchez Deveaux" wrote in message
news:

KL,
El disparo de la macro se debe originar al momento de seleccionar la celda
Al (por ejemplo), si ésta tuviera el valor mayor a cero desde luego, de lo
contrario que se cancele la macro.
Saludos.

KL escribió:

Alfredo,

creo q este es el mejor, solo tienes q darnos mas detalle como por
ejemplo: ?en q momento quieres q se dispare el macro: en cuanto la celda
se ponga en 0, al abrir o cerrar el fichero, al seleccionar alguna celda
(o rango) especifica, al hacer doble clic sobre la celda, al imprimir la
hoja, etc. etc?

Saludos,
KL

"Alfredo Sanchez Deveaux" wrote in message
news:

Alguien podria indicarme algun enlace de ejemplo(s) para realizar la
ejecucion de una macro si el valor de una celda es mayor a cero?
Gracias anticipadas por la ayuda.

Gracias, q sencillo
Saludos

"Ignacio Pérez" <ignaciopsantaella@(eliminar)hotmail.com> escribió en el
mensaje news:#O#

Hola Mares:
pulsa la tecla "Bloq Despl" y arreglao.
Un saludo

"Mares" escribió en el mensaje
news:
> No que he podido tocar, que ahora al pulsar las teclas de

desplazamiento,

> en
> lugar de moverse la celda donde está situado el cursor, se mueve la

barra

> de
> desplazamiento de la hoja.
>
> He buscado por todas partes, y no doy como volver a dejarlo en su estado
> anterior.
>
> Gracias.
>
>