Leader Note API text Position

[johnster100]

Hi,

I'm adding some leaders to a drawing using API, this works fine.

However, when I place the leader the text is always to the left or right of the leader, I would like it to be above leader like in the attached image. What property can I access to achieve this?

thanks,

John

[YuhanZhang · Accepted solution]

Now in Inventor drawing you can rotate the Leader Note text, but this also changes the text orientation, is it acceptable for you? You can either use LeaderNote.Rotation or below VBA sample to change the text position:

Sub ChangeLeaderTextOrientation()
    Dim oLeaderNote As LeaderNote
    Set oLeaderNote = Me.SelectSet(1)
    
    Debug.Print oLeaderNote.Rotation
    oLeaderNote.Rotation = 1.57
    Dim oPo As Point2d
    If oLeaderNote.Leader.HasRootNode Then
        If Not (oLeaderNote.Position.IsEqualTo(oLeaderNote.Leader.RootNode.Position, 0.000001)) Then
            Set oPo = oLeaderNote.Leader.RootNode.Position
            
            oPo.X = oLeaderNote.Leader.RootNode.Position.X
            oPo.Y = oLeaderNote.Leader.RootNode.Position.Y + 0.3
            
            ' Change the leader note text position just above the root node
            oLeaderNote.Position = oPo
        End If
    End If
    
End Sub

[johnster100]

Hi,

that worked great,

thanks