@yuniki

При использовании ActiveX c Excel файлами при предложении использовать данный xls файл другому пользователю сети предприятия у того может не оказаться требующегося ActiveX контрола - надо следовательно программе - макросу,находящейся в xls файле его откуда- то из сети взять и установить на компьютер пользователя. Если как зарегистрировать программно я знаю ( shell regsvr32 -s <Path2DLL>), то как перед этим проверить - не имеется ли уже данный контрол в системе пользователя - мне непонятно .
Кто - что нибудь может предложить по этому поводу ?

0

@Ennor

В принципе, можешь хоть 10 раз зарегистрировать - ничего страшного не будет. А вообще... Попробуй так: сделай отдельную функцию, в ней поставь On Error Resume Next и попытайся создать объект из DLL или чего у тебя там. Сразу после этого:

If Err.Number <> 0 Then
...

Ну, ты понял, я надеюсь. Функцию вызываешь при самом старте макроса.

0

@yuniki

Да , насчет ловушки я знаю .
Но по зрелому размышлению, я понял, что в описанном мной случае ничто не поможет.
Дело в том, что нужно распространять визуальный ActiveX который спроектирован на форме ввода в Excel - скажем, DTPicker, события от него надо обработать программно. А следовательно, если попытаться добавлять его в UserForm.Controls даже после успешной его регистрации, то и объявлять WithEvent переменную придется ранним связыванием, т.е. как класс DTPicker - а после программной регистрации контрола , как я понял, я могу использовать только позднее связывание и, следовательно, не смогу написать обработчики событий для этого контрола в модуле формы .
Да и вообще, получается , слишком много кода для поддержки автоматического распространения контролов с Excel'скими файлами.

0

@Ennor

Да создай в контроле тестовый класс с одним свойством, его и создавай.

0

Vita

Я иногда проверял такие вещи до вызова всех Форм, т.е. в SubMain(), а потом после регистрации нужных контролов запускал первую форму. И далее по алгоритму.