InfoConnect for Airlines VBA Guide
AllViews Property
Gets all views.
Object.AllViews As _View()

If you are developing a Microsoft Office macro, use a Variant type when enumerating through a set as shown in the GetAllViewsWithMicrosoftOffice sample shown below. Do not use a View type as an enumerator in a Microsoft Office macro.

If you are developing a macro in a Micro Focus product, you can use a Variant type or a View type for the enumerator.

This sample gets all of the running views and prints the number of views and the title of each view.
'Use this sample when developing macros in Microsoft Office products. 
'This sample also works in macros developed in Micro Focus products.
Public Sub GetAllViewsWithMicrosoftOffice()
    'Declare object variables for the Application and Frame Objects
    Dim app As Attachmate_Reflection_Objects_Framework.ApplicationObject
    Dim f As Attachmate_Reflection_Objects.Frame
    'Get a handle to the Application object
    Set app = GetObject("Reflection Workspace")
    'Get the Frame object
    Set f = app.GetObject("Frame")
    Debug.Print "count=" & f.ViewCount
    'Get all the view objects in the frame and print the title of each view
    Dim myView As Attachmate_Reflection_Objects.view
    Dim v As Variant
    For Each v In f.allViews
        Set myView = v
        Debug.Print "View title = " & myView.titleText
End Sub
See Also