ник: Lukas
Функцией из библиотечной базы создаю модуль в приложении:
Public Function AddModuleToProject(strModuleName As String, strText As String)
Dim VBProj As Object
Dim VBComp As Object
Set VBProj = VBE.VBProjects(1)
Set VBComp = VBProj.VBComponents.Add(1)
VBComp.Name = strModuleName
With VBComp.CodeModule
.AddFromString strText
End With
DoCmd.Save acModule, strModuleName
Set VBProj = Nothing
Set VBComp = Nothing
End Function
|
Не нравится строчка:
DoCmd.Save acModule, strModuleName
|
Не найду метода библиотеки VBIDE для сохранения модуля , не подскажите?
Благодарю за внимание.