close

I got a problem with my Excel macro. It does some calculations then displays
a message box. However the message box is actually

displayed before the window maximize so what actually happens is the user
sees the minimised Excel blinking in the taskbar.

The problem is I have been told this blinking uses 50% of the CPU or almost
100% CPU usage. Is this normal? Is it waiting in a for

loop prompt?

Public Sub Updates_Off()
With Application
.ScreenUpdating = False
.EnableEvents = False
.Calculation = xlCalculationManual
End With
End Sub

Public Sub Updates_On()
With Application
.StatusBar = False
.ScreenUpdating = True
.DisplayAlerts = True
.EnableEvents = True
.EnableCancelKey = xlInterrupt
.Cursor = xlDefault
.Calculation = xlCalculationAutomatic
End With
End Sub

Private Sub Workbook_Open()
Updates_Off
Application.WindowState = xlMinimized
Updates_On
Response = MsgBox(quot;Testquot;, vbYes vbCritical, quot;Template Messagequot;)
Application.WindowState = xlMaximized
Application.Quit
End Sub

arrow
arrow
    全站熱搜
    創作者介紹
    創作者 software 的頭像
    software

    software

    software 發表在 痞客邦 留言(0) 人氣()