VBA для чтения из реестра

Question

Есть ли код, который позволит мне прочитать версию офиса, установленного на машине, и расположение библиотек из MS Access?

Так что я недавно убедился, что поздняя привязка - это путьс автоматизацией выполняет мое приложение.Тем не менее, автоматизация является основной функцией этого приложения, и мне нужно выделять различные подпрограммы из некоторых кодов, зависящих от версии (в основном для презентаций PPT).

Так что я не пытаюсь решить мою проблему со ссылкойпроверка & IsBroken методы больше, потому что это не поможет.Но я все еще хотел бы знать, какая версия офиса установлена, какая версия каждого из офисных приложений установлена ​​(Excel 11.0, Outlook 11.0 и т. Д.), И пути к файлам к dll.

Итак, ямне интересно, могу ли я получить эту информацию, прочитав реестр?

Answer 1

Если ваша поздняя привязка, безусловно, все, что вам нужно, это независимая версия *.Application progid?

Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
Debug.Print "ver " & oApp.Version, "build " & oApp.Build
oApp.Quit

Answer 2

SysCmd метод может использоваться для определения системной информации о Microsoft Access

SysCmd(acSysCmdAccessVer) - вернет версию доступа
SysCmd(acSysCmdAccessDir) - вернет путь к файлу в dll