|  

» Add content to a module from a file using VBA in Microsoft Excel

VBA macro tip contributed by Erlandsen Data Consulting offering Microsoft Excel Application development, template customization, support and training solutions
If you don't want to add a complete module, you can add just the missing procedures
to an existing module by using the macro below. It adds the content of a text file to an existing module:
Sub ImportModuleCode(ByVal wb As Workbook, _
    ByVal ModuleName As String, ByVal ImportFromFile As String)
' imports code to ModuleName in wb from a textfile named ImportFromFile
Dim VBCM As CodeModule
    If Dir(ImportFromFile) = "" Then Exit Sub
    On Error Resume Next
    Set VBCM = wb.VBProject.VBComponents(ModuleName).CodeModule
    If Not VBCM Is Nothing Then
        VBCM.AddFromFile ImportFromFile
        Set VBCM = Nothing
    End If
    On Error GoTo 0
End Sub

Example:
ImportModuleCode ActiveWorkbook, "TestModule", "C:\FolderName\NewCode.txt"


Rate This Tip
12 34 5
Rating: 4.25     Views: 12454
No comments have been submitted.
Click here to post comment
For Registered Users
Name
Comment Title
Comments