[VBA程序]：编号关联尺寸的问题

下载源码

各位斑竹,高手:

    好

我刚接触VBA,试着做个小程序,要实现这样的功能:

      一  在已经标好尺寸的图上,给尺寸加编号,编号始终要连续,如编号从1开始到99,中间添加编号23后,先前的23这个编号和这以后的编号都自动加1,删除中间的编号也是这样的,对应的编号自动减1;

     二   将编号和尺寸信息输出到excel或者word上去

在编程过程中,遇到一些问题,希望大家给点建议:

     1   编号既然可以修改,那么应该存在着编号判断机制,我不知道怎么把这个机制保存到该dwg文件中去

     2   在进行尺寸输出时,编号要和尺寸相对应,这里涉及到编号和尺寸的关联问题,我暂时还没找到答案.

  在本论坛搜索了,没有相关的主题,所以我这里把这个问题提出来,希望大家给点建议,我的邮箱是:feng-feng2005@163.com

  谢谢!!!

guojianguo1012

cad中每个对象都有自己唯一的句柄，可以将编号和尺寸用程序将对应的对象句柄写到一个外部文件中去，在你更改编号之后只要执行一次程序，就可以将对应的编号全部如你所期望的自动加1，也可以实现一一对应的输出到excel中。另外不要每改一个编号就想其他的都跟着变，那样效率会很低，都设置好后一次改过最快了。