Aggiungi contenuto a un modulo da un file utilizzando VBA in Microsoft Excel

Se non vuoi aggiungere un modulo completo, puoi aggiungere solo le procedure mancanti
a un modulo esistente utilizzando la macro sottostante. Aggiunge il contenuto di un file di testo a un modulo esistente:

Sub ImportModuleCode(ByVal wb As Workbook, _ ByVal ModuleName As String, ByVal ImportFromFile As String) ' importa il codice in ModuleName in wb da un file di testo denominato ImportFromFile Dim VBCM As CodeModule If Dir(ImportFromFile) = "" Quindi esci da Sub On Error Riprendi Avanti Imposta VBCM = wb.VBProject.VBComponents(ModuleName).CodeModule If Not VBCM Is Nothing Then VBCM.AddFromFile ImportFromFile Imposta VBCM = Nothing End If On Error GoTo 0 End Sub

Esempio:

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