No me funciona el código para ejecutar una Macro???

10/02/2004 - 17:05 por angel | Informe spam
Tengo un Procedimiento VBA que si el total de una celda
es > 5000 ejecuta la macro MNU_SendData, pero NO me hace
caso, es decir el código se ejecuta (probe poniendo un
breakpoint) pero la Macro NO hace nada.
Cómo se ve en el código que anexo probé posicionándome en
la hoja respectiva -aunque solo tengo una hoja- y ponerlo
luego de EnableEvents = False o EnableEvents = Trae pero
tampoco me funciona.
Lo más lindo es que si agrego un botón en la hoja y le
asigno la macro "MNU_SendData" cuando presiono el botón
la macro se ejecuta correctamente y hace lo que tienen
que hacer.
Por que NO me funciona desde VBA????


Worksheets("Ventas").Select
Application.EnableEvents = False
Application.Run MNU_SendData
Application.EnableEvents = True
Application.Run MNU_SendData
 

Leer las respuestas

#1 Ignacio Pérez
10/02/2004 - 17:34 | Informe spam
Hola Angel:
Si quieres que se ejecute tu macro vas a tener que ponerla en le evento
change de tu hoja
¿Sabes?
boton derecho sobre la etiqueta de la hoja, ver codigo y pegar esto:

Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets("Ventas").Select
MNU_SendData
End Sub

Un saludo

"angel" escribió en el mensaje
news:de4401c3efef$b4171660$
Tengo un Procedimiento VBA que si el total de una celda
es > 5000 ejecuta la macro MNU_SendData, pero NO me hace
caso, es decir el código se ejecuta (probe poniendo un
breakpoint) pero la Macro NO hace nada.
Cómo se ve en el código que anexo probé posicionándome en
la hoja respectiva -aunque solo tengo una hoja- y ponerlo
luego de EnableEvents = False o EnableEvents = Trae pero
tampoco me funciona.
Lo más lindo es que si agrego un botón en la hoja y le
asigno la macro "MNU_SendData" cuando presiono el botón
la macro se ejecuta correctamente y hace lo que tienen
que hacer.
Por que NO me funciona desde VBA????


Worksheets("Ventas").Select
Application.EnableEvents = False
Application.Run MNU_SendData
Application.EnableEvents = True
Application.Run MNU_SendData

Preguntas similares