Как зарегистрировать ActiveX - VBA
Формулировка задачи:
Как зарегистрировать ActiveX с помощью VBA, а не вручную?
Задачи:
- нужно узнать: зарегистрирован ли ActiveX или нет;
- если не зарегистрирован, то зарегистрировать.
Решение задачи: «Как зарегистрировать ActiveX»
textual
Листинг программы
Sub Procedure3() 'HKEY_CLASSES_ROOT = &H80000000 Const lРаздел As Long = &H80000000 'Этот раздел я создал. Const sПодраздел As String = "Новый раздел #1" 'KEY_READ = &H20019 Const lРежим As String = &H20019 Dim lVariant As Long Debug.Print RegOpenKeyEx(lРаздел, sПодраздел, 0, lРежим, lVariant) End Sub