MyTetra Share
Делитесь знаниями!
Время создания: 16.03.2019 23:43
Раздел: Разные закладки - VBA - VBA управление кодами
Запись: xintrea/mytetra_db_adgaver_new/master/base/1512843800uies2arx6c/text.html на raw.githubusercontent.com

Public Sub ImportSourceFiles(sourcePath As String)

Dim file As String

file = Dir(sourcePath)

While (file <> vbNullString)

Application.VBE.ActiveVBProject.VBComponents.Import sourcePath & file

file = Dir

Wend

End Sub

Так же в этом разделе:
 
MyTetra Share v.0.62
Яндекс индекс цитирования