Window.Active

Property Active As Boolean

Member of Window

The Active property returns whether a window is active. If the window is active, a value of True is returned, indicating that it is currently in use.

The Active property returns a read-only value.

The following code example displays the caption of the active window:

Sub Test() 
 Dim Wnd As Window 
 For Each Wnd In ActiveDocument.Windows 
  If Wnd.Active = 1 Then 
   MsgBox Wnd.Caption & " is the active window." 
  End If 
 Next Wnd 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.