Public Property PageBoundary() As Variant

Dim MySubModel As SubModel
Dim PageBound As Integer
PageBound = 100
MySubModel.PageBoundary = PageBound

• SubModel Object