ClearOverrides Example

Land Auto

ClearOverrides Example

Sub Example_ClearOverrides()
    
    ' This function clears the overrides for the first PoinGroup in
    ' the collection.
    Dim pntGrp As AeccPointGroup
    Set pntGrp = AeccApplication.ActiveProject.PointGroups.Item(0)
    
    pntGrp.ClearOverrides
    
    MsgBox "The overrides have been cleared for PointGroup: " & pntGrp.GroupName, _
        vbInformation, "ClearOverrides Example"
    
End Sub