请教AutoCAD二次开发问题。

jin888555

请教：
1，在Vlisp环境下，用entget返回尺寸图元的组码后，例如如下的一个标注尺寸的组码：
  
((-1 . <图元名: 7ed8d930>) (0 . "DIMENSION") (330 . <图元名: 7ef67cf8>) (5 . "42DE") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbDimension") (2 . "*D100") (10 1901.16 -919.027 0.0) (11 1856.17 -916.402 0.0) (12 0.0 0.0 0.0) (70 . 32) (1 . "") (71 . 5) (72 . 1) (41 . 1.0) (42 . 89.9805) (52 . 0.0) (53 . 0.0) (54 . 0.0) (51 . 0.0) (210 0.0 0.0 1.0) (3 . "ISO-25") (100 . "AcDbAlignedDimension") (13 1811.18 -886.914 0.0) (14 1901.16 -890.584 0.0) (15 0.0 0.0 0.0) (16 0.0 0.0 0.0) (40 . 0.0) (50 . 0.0) (100 . "AcDbRotatedDimension"))
  
然后如何操作才能修改这个尺寸的标注文字的字体高度?
  
2，因为我们正在为企业作ERP的原始数据整理工作，因此除了要整理大量的图纸，还有大量的EXCELL文件要检索，但是通过win2000操作系统的搜索功能，在不打开EXCELL文件的情况下，并不能有效地搜到EXCELL文件内部的中文内容，我想通过EXCELL的VBA开发来帮忙实现，思路可以是比如，同时打开1000个EXCELL文件,在每一个文件打开时自动加载并运行某个VBA工程，这个工程实现将本文件另存为文本文件，同时关闭本文件就可以了，1000个文件顺序执行，就可以了。
本人已经通过类似的思路和方法实现了将大量的AutoCAD文件中的文本提取出来进行检索，但那是用Vlisp实现的，VBA本人不是很熟，所以求教诸位达人。

jin888555

jihero