[quote user="blumax57"]
There is a way in VBA to get the coordinates of view.extents relative to model[/quote]
View.Origin is the view's lower-left corner. View.Extents is the size of the view. Vector add Origin + Extents = top-right corner.
Dim corner As Point3d corner = Point3dAdd (oView.Origin, oView.Extents)