渴求怎么使用VBA获取dwg文件的图号、图名、图幅？

渴求如何使用VBA获取dwg文件的图号、图名、图幅？？？
工作中需要整理大量AUTOCAD文件（即 dwg文件）的图号、图名、图幅，这些信息在dwg文件的标题栏中。
把每张图打开，挨个抄一遍到excel中费时费力，还容易出错。希望能使用VBA来编程完成这个工作。哪位大神出来帮帮忙？感激不尽！
------解决思路----------------------
先录个手动操作的例子，然后适当修改修改应该就可以了.........
------解决思路----------------------
AUTOCAD是有二次开发接口的,可以调用这个接口来创建AUTOCAD对象,再读入DWG获取相应的信息,具体方法可以查一下AUTOCAD的二次开发文档.

另外也可以自己尝试解析一下DWG文件.