Как сохранить модуль из проекта, которого нет в активной презентации (пример: надстройка)

#vba #powerpoint

Вопрос:

Я хочу автоматизировать сохранение модулей, пользовательских форм и классов из нескольких надстроек, которые я писал на протяжении многих лет. Мне нужно иметь возможность ссылаться на каждый из проектов и сохранять его компоненты. Все примеры, которые я нашел, относятся либо к excel, либо к активной презентации, а не к проекту или надстройке.

У меня работает большая часть кода, но я не могу ссылаться на проекты, а затем на компоненты в этом проекте, чтобы иметь возможность их сохранить.

Вот соответствующая часть кода…

  Option explicit
 Public Sub SaveVBAProjects()

 Dim objIDE As VBIDE.VBE
 Set objIDE = Application.VBE

 Debug.Print objIDE.VBProjects("PrepRender").BuildFileName

 End Sub
 

Это примерно так? Как я должен перебирать компоненты и сохранять их?

Может ли кто-нибудь, пожалуйста, помочь мне с этим фрагментом кода для ссылки на надстройку?

Заранее спасибо

Комментарии:

1. Если у вас есть ссылка на открытый файл, вы можете использовать его VBProject свойство.