Window.ActiveView

Property ActiveView As ActiveView

Member of Window

The ActiveView property returns reference to the active view.

The ActiveView property returns a read-only value.

The following code example zooms the view to display all of the shapes in the document:

Sub Test() 
 Dim actvw As ActiveView 
 Set actvw = ActiveWindow.ActiveView 
 actvw.ToFitAllObjects 
 Set actvw = Nothing 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.