Ejecutar macros
Hola, gfellay.
Tengo otra duda.
Para ejecutar Macros, creo botones o le pongo el método abreviado.
Lo malo de las macros es que tienen un ciclo de vida corto. --> Hasta dónde he podido ver.
¿Existe alguna forma de que Una macro esté atenga a alguna condición dentro de las celdas (cómo seleccionar una celda y colocar algún número or something ) para que se ejecute la macro.?
Osea, algo como que la macro esté siempre activa.
Gracias otra vez.
Tengo otra duda.
Para ejecutar Macros, creo botones o le pongo el método abreviado.
Lo malo de las macros es que tienen un ciclo de vida corto. --> Hasta dónde he podido ver.
¿Existe alguna forma de que Una macro esté atenga a alguna condición dentro de las celdas (cómo seleccionar una celda y colocar algún número or something ) para que se ejecute la macro.?
Osea, algo como que la macro esté siempre activa.
Gracias otra vez.
1 Respuesta
Respuesta
1
Si estás hablando siempre dentro de un archivo, lo podes manejar mediante "Eventos"; en el Editor VBA, normalmente a la derecha te va a mostrar el proyecto del archivo; entre otras cosas verás todas las hojas que tiene el libro; dale doble click allí y verás sobre la zona de programación que dice algo como "(General)"
Si cliqueas sobre ese combo puedes seleccionar Worksheet y luego sobre la derecha selecciona Change
te quedará algo como
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
En este caso se ejecutará el código cuando cambies una celda (y Target es la celda que está cambiando en ese momento); lo que puedes hacer es verificar si la celda es la que tu precisabas como primer instrucción y luego ejecutar algo; podría ser algo como
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "Es la celda A1"
End If
End Sub
Si cliqueas sobre ese combo puedes seleccionar Worksheet y luego sobre la derecha selecciona Change
te quedará algo como
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
En este caso se ejecutará el código cuando cambies una celda (y Target es la celda que está cambiando en ese momento); lo que puedes hacer es verificar si la celda es la que tu precisabas como primer instrucción y luego ejecutar algo; podría ser algo como
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "Es la celda A1"
End If
End Sub