[求助]请赐教关于等分的VBA编程

时光

请教：
本人为VBA初学者。日前，拜读了贵论坛出版的AutoCAD开发精彩实例教程。有个问题不能解决。望能赐教。
如何将该图形使用VBA进行定距等分 并进行标注列表表示。（本图每10个单位进行等分，直线与曲线段连接处也是同样要求。）效果如图 
在此先谢过。

(宏目地：选中多线段进行等分、编号并注明坐标。坐标最好能导出为TXT、EXCEL、WORD等文件)