#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
свойство.