Με τον παρακάτω κώδικα ελέγχουμε εάν υπάρχει το module και το καλούμε
Sub InsertVBComponent(ByVal wb As Workbook, ByVal CompFileName As String)
' inserts the contents of CompFileName as a new component in wb
' CompFileName must be a valid VBA component suited for
' import (an exported VBA component)
If Dir(CompFileName) <> "" Then
' source file exist
On Error Resume Next wb.VBProject.VBComponents.Import CompFileName
' εισαγωγή
On Error GoTo 0
End If
Set wb = Nothing
End Sub
πως το καλώ για παράδειγμα
InsertVBComponent ActiveWorkbook, "C:\FolderName\Filename.bas"