问一个关于路径的问题

sharksun

在excel vba中写一个小程序，遇到这样一个问题：

设置acad字体时，需要加载acad里的fonts文件夹中字体，也就是需要路径。
问题是当acad版本及安装路径不同时，如何统一表达？
例如：
   "c:/AutoCAD2005/fonts/bigfonts.shx"
    "d:/autocad2002/fonts/bigfonts.shx"
（由于excel文件和acad不在一个目录，所有这个和相对路径还不大一样）
另外，想使用getfonts setfonts来设置，但是对于大字体得不到字体名，有办法解决么？

多谢。

雪山飞狐_lzh

可以先获取Application.Path

fanny_6

可以从注册表中找到这个路径，然后访问注册表，把这个路径读出