Usando eventos com o objeto Application

Antes de você poder usar eventos com o objeto Application, você precisa criar um módulo de classe e declarar um objeto do tipo Application com eventos. Por exemplo, suponha que um novo módulo de classe seja criado e chamado EventClassModule. O novo módulo de classe conterá o código seguinte.

Public WithEvents App As Application

Depois que o novo objeto tiver sido declarado com eventos, ele será exibido na caixa Lista de objetos no módulo de classe e você poderá escrever procedimentos de evento para o novo objeto. (Quando você seleciona o novo objeto na caixa Objeto , os eventos válidos para esse objeto são listados na caixa de lista Procedimento .)

Entretanto, antes dos procedimentos serem executados, você precisa conectar o objeto declarado no módulo de classe com o objeto Application. Você pode fazer isso com o código seguinte a partir de qualquer módulo.

Exemplo

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

Após executar o procedimento InicializarApl, o objeto App do módulo de classe apontará para o objeto Application do Microsoft Excel, e os procedimentos de evento do módulo de classe serão executados quando os eventos ocorrerem.

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.