通过

Application.Windows2 Property

  • 项目
Project Developer Reference

Returns a Windows2 collection representing the open windows in the application. Read-only Object.

Syntax

expression.Windows2

expression   A variable that represents an Application object.

Return Value
Windows2

Remarks

The Windows2 property is recommended, in place of the Windows property, for all new development in VBA and external applications developed with the .NET Framework.

Example
The following example cascades all the open windows.

Visual Basic for Applications 
  Sub CascadeWindows()
    Dim I As Integer
    
    ActiveWindow.WindowState = pjNormal ' Restore the window.
    
    With Application.Windows2
        For I = 1 To .Count
            .Item(I).Activate
            .Item(I).Top = (I - 1) * 15
            .Item(I).Left = (I - 1) * 15
        Next I
    End With
    
End Sub

See Also