对这个还真不太熟悉,所以我的办法可能有些笨拙。
ActiveDocument.Range 可以获得全部文本,如果数组量不多,你可以直接将其读入然后处理。否则可以利用临时文件,将这些文本存入一个文本文件,然后一行一行读入。对于每行数据可以使用Split进行分解得到相应的值。

解决方案 »

  1.   

    我觉得放到excel里面会好处理一些吧!
      

  2.   

    楼上的朋友,我的意思是目前有上万个word文档,需要把其中的某几行的部分信息读出来.
      

  3.   

    是啊,如果是定长记录,ActiveDocument.Range对象可以准确定位。比如每行都是200个字符,用
    ActiveDocument.Range(i*200, i*200+200)就可以了。
      

  4.   

    给你个思路,自己去查WORD的VBA帮助.
    首先获取WORD对象,然后获取当前页内容,将字符按VBCRLF分割得字符串数组,而后分割即可.实际上,WORD里面有一个函数可以达到你的要求,但那个该死的,操作起来我感觉还不如用VB的函数去写....以上