ActiveWindow Property
Returns a Window object that represents the active window (the window on top). Read-only. Returns Nothing if there are no windows open.
Example
This example displays the name (Caption property) of the active window.
MsgBox "The name of the active window is " & ActiveWindow.Caption