Pessoal,
Afim de liberar a memória do Excel, eu utilizo o código abaixo no comando UserForm_Terminate().
Private Sub UserForm_Terminate()
On Error Resume Next
Set mclsFormChanger = Nothing
Dim wsativo
Dim fechar
Set wsativo = ThisWorkbook.ActiveSheet
Set fechar = UserForm7
Set wsativo = Nothing
Set fechar = Nothing
end sub
Isso funciona perfeitamente.
Mas como eu faço para executá-lo sempre que o projeto for Minimizado? Eu pergunto isso, pois, ao minimizá-lo, observo que o Excel fica processando algo em segundo plano.
Postado : 20/11/2015 5:20 am