Uso de eventos con el objeto Application

Para utilizar eventos con el objeto Application, debe crear un módulo de clase y declarar un objeto de tipo Application con eventos. En el siguiente ejemplo se supone que hemos creado un nuevo módulo de clase y lo hemos denominado EventClassModule. El nuevo módulo de clase contiene el código siguiente:

Public WithEvents App As Application

Una vez declarado el nuevo objeto con eventos, aparece en el cuadro de lista Objeto del módulo de clase y puede escribir procedimientos de eventos para el nuevo objeto. (Al seleccionar el nuevo objeto en el cuadro Objeto , los eventos válidos para ese objeto se muestran en el cuadro de lista Procedimiento ).

Antes de poder ejecutar los procedimientos, debe conectar el objeto declarado en el módulo de clase con el objeto Application. Para ello, puede utilizar el siguiente código desde cualquier módulo.

Ejemplo:

Dim X As New EventClassModule 
 
Sub InitializeApp() 
 Set X.App = Application 
End Sub

Después de ejecutar el procedimiento InitializeApp, el objeto App del módulo de clase hace referencia al objeto Application de Excel y los procedimientos de evento del módulo de clase se ejecutarán cuando ocurra un evento.

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.