ищу создать макрос, которыйЯ установлю надстройку для пользователя на ленту Excel. Я'м до:

Private Sub Workbook_Open()

On Error Resume Next
Application.AddIns("Name of Addin").Installed = False
On Error GoTo 0

With Application
    .AddIns.Add "Filepath to addin in shared location", False
    .AddIns("Name of Addin").Installed = True
End With

ThisWorkbook.Close False

End Sub

После запуска макроса надстройка без проблем устанавливается на ленту. Проблема в том, что после закрытия Excel надстройка больше не отображается на ленте.

Похоже, что Excel ожидает, что надстройка будет скопирована в папку C: \ Documents and Settings \ Имя пользователя \ Application Data \ Microsoft \ AddiIns, так как выдает ошибку, которая может 'не найти его при запуске Excel после закрытия.

Теперь я понимаю, что вторая (ложная) переменная для строки кода ниже в основном говорит, что надстройка не должнане должны быть скопированы в каталог AddIns и должны оставаться в общей папке.

.AddIns.Add "Filepath to addin in shared location", False

Любые идеи о том, почему Excel ожидает, что надстройка будет в папке пользователя по умолчанию?