Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
chandra.shekar.g
in reply to: avincent

@avincent,

 

 

Try below VBA code to determine values and tolerances of chamfer notes. Usually, tolerances will return in integer values which can mapped to respective LinearPrecisionEnum using below Inventor 2019 help documentation link.

 

http://help.autodesk.com/view/INVNTOR/2019/ENU/?guid=GUID-FBD80F0D-AF01-47AA-BC61-8DB782ACAE0D

 

Sub Main()

    Dim oDoc As DrawingDocument
    Set oDoc = ThisApplication.ActiveDocument
    
    Dim oSheet As Sheet
    Set oSheet = oDoc.ActiveSheet
    
    Dim oChamferNote As ChamferNote
    Set oChamferNote = oSheet.DrawingNotes.ChamferNotes.Item(1)
    
    Debug.Print oChamferNote.Text
    
    Dim oStyle As DimensionStyle
    Set oStyle = oChamferNote.DimensionStyle
    
    Dim oLinear As LinearPrecisionEnum
    oLinear = oStyle.LinearPrecision
    
    Debug.Print "Linear precision : " & oLinear
    
    Dim oAngular As LinearPrecisionEnum
    oAngular = oStyle.AngularPrecision
     
    Debug.Print "Angular precision : " & oAngular
End Sub

Thanks and regards,


CHANDRA SHEKAR G
Developer Advocate
Autodesk Developer Network