MyTetra Share
Делитесь знаниями!
Время создания: 16.03.2019 23:43
Раздел: !Закладки - VBA - VBA управление кодами

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.52
Яндекс индекс цитирования