Measurement limits

MaurizioIEC · April 2015

Hi Guys,
Is there any method to set by macro the Measurements limits (eg Area min / Max)?
I need to change them dinamically during the macro execution.
I tried to do manually recording the operation but nothing has been saved in the macro editor.
Thank you
Ciao
Maurizio

YuriG · April 2015

Hi Maurizio,

Yes, this command is recordable when you adjust ranges in the Edit range dialog.
Here is my recorded macro:

    Public Function SetRanges() As SimpleScript
        SetRanges = New SimpleScript
        Dim doc1

        With Application.DocumentCommands.Active(SetRanges)
            .Run(doc1)
        End With

        With Measure.MeasurementsCommands.Options(SetRanges)
            .Segmentation.ApplyFilters = True
            .Segmentation.FilterRanges = New System.Collections.Generic.List(Of MeasFilterEntry)
                .Segmentation.FilterRanges.Add( New MeasFilterEntry(eMeasures.RgnArea,201.150999790646R,792.57957015754R))
            .Run(doc1)
        End With

        With Measure.MeasurementsCommands.ApplyFilters(SetRanges)
            .Run(doc1)
        End With

    End Function

Regards,

Yuri

Measurement limits

Best Answer