Detecting when the Excel Application has been minimized

[sbendbuckeye]

Hello all,

How can I detect the user clicking the Minimize button on the title bar? Thanks in advance for any ideas and/or suggestions!

 

[VoG]

I don't know if you can detect the click but you can nquery the window status:

Sub ReturnWindowState()
    Dim szState As String
    Select Case Application.WindowState
        Case xlMaximized
            szState = "Maximized"
        Case xlMinimized
            szState = "Minimized"
        Case xlNormal
            szState = "Normal"
    End Select
    MsgBox "Window state is: " & szState
End Sub

 

[sbendbuckeye]

Hello,

Thanks for the response. I have a custom menu item that needs to run some code when the Excek application itself is minimized or loses focus. The Excel Application events are all WorkBook, WorkSheet or Window events pertaining to inter Excel workings.

I'm guessing I will need to use the API somehow, but I'm not sure where to start. Thanks again!