Parcels Example

Land Auto

previous page next page

Parcels Example 

Sub Example_Parcels()
    
    ' This example returns the number of Parcels in the current project.
    Dim proj As AeccProject
    Set proj = AeccApplication.ActiveProject
    
    MsgBox "The number of Parcels in the current Project is: " & proj.Parcels.Count _
        , vbInformation, "Parcels Example"
    
End Sub

previous page start next page