Таким образом, вы можете отобразить управляемый макросами список всех надстроек и сразу увидеть, какие надстройки включены, а какие нет.
Хотели бы вы запросить макроуправляемые надстройки, установленные в системе? Это полезно, например, чтобы увидеть, все ли намеченные надстройки настроили пользователи.
Вы можете установить надстройки, чтобы расширить функции Excel. Это программные расширения, которые настраиваются с помощью диспетчера надстроек. Вы можете найти эту команду при использовании Excel до версии 2003 через меню EXTRAS-ADD-INS.
Если вы используете Excel 2007, вызовите этот список с помощью кнопки Office, а затем выберите ОПЦИИ EXCEL - ДОБАВЛЕНИЯ - ПЕРЕЙТИ.
Если вы используете Excel 2010, щелкните ФАЙЛ, затем выберите ОПЦИИ, а затем ДОБАВИТЬ - ПЕРЕЙДИТЕ К.
Если вы хотите обратиться к списку из макроса, используйте объект AddIns. Следующий макрос отображает список всех надстроек в новой электронной таблице Excel. Для каждой записи в списке логическое значение указывает, установлена ли соответствующая надстройка. Вот как выглядит макрос:
Sub ShowAddIns ()
Dim i как целое число
С Рабочими тетрадями. Доп. Рабочие листы (1)
Для i = 1 в AddIns.Count
.Cells (i + 1, 1) .Value = AddIns (i) .FullName
.Cells (i + 1, 2) .Value = AddIns (i) .Installed
Далее я
.Range ("a1: b1"). Value = Array ("Надстройка", "Установлено")
.Range ("a1: b1"). Font.Bold = True
.Range ("a1: b1"). Полный столбец.AutoFit
Конец с
Конец подписки
После запуска макрос создает список надстроек. На следующем рисунке показано, как может выглядеть этот список:
Используйте свойство Name вместо свойства FullName, если вы не хотите считывать полный путь, а только имя файла надстроек.
Чтобы ввести макрос, нажмите комбинацию клавиш ALT F11 в Excel. Это вызывает редактор VBA. Используйте команду ВСТАВИТЬ - МОДУЛЬ, чтобы вставить пустой лист модуля. Чтобы запустить макрос, нажмите комбинацию клавиш ALT F8 в Excel.
