How to track drawing nodes VBA

amebow
over 6 years ago

I need your help in macros creation which will include two things:

1. PEN appears to be an active instrument in case of actuation

2. This instrument follows up my actions and in case I enter an 3 nodes some action activates. (and I need to get coordinates of nodes)

Sorry for my english

Parents
No Data
Reply
  • 0 over 6 years ago

    If you run this macro after you had drawn a curve with the 'Pen Tool' and selected it, do you get what you want?

    Sub Test()

    Dim CurSh As Shape, i As Integer

    Set CurSh = ActiveShape

    For i = 1 To CurSh.Curve.Nodes.Count
       MsgBox Format(CurSh.Curve.Nodes(i).PositionX, "0.00") + " " + Format(CurSh.Curve.Nodes(i).PositionY, "0.00")
    Next i

    End Sub

Children

© Corel Corporation. All rights reserved. The content herein is in the form of a personal web log ("Blog") or forum posting. As such, the views expressed in this site are those of the participants and do not necessarily reflect the views of Corel Corporation, or its affiliates and their respective officers, directors, employees and agents. Terms of Use / Privacy​ ​/ ​Cookies / Terms and Conditions / User Guidelines.