Module importieren und exportieren

Module importieren

Mit der Import-Methode können einem Projekt ein Formular, ein Modul, eine Klasse usw. hinzugefügt werden. Diese müssen in Form einer Datei vorliegen und besitzen eine der folgenden Endungen (*.frm,*.bas,*.cls).

1    Sub ModulImport()
2    Dim sName As String 
3    sName = InputBox("Bitte den Dateipfad eingeben", "Modul importieren")
4    ActiveDocument.VBProject.VBComponents.Import (sName)
5    End Sub 

Module exportieren

Zum Exportieren kann die Export-Methode verwendet werden. Dazu muss als Aufruf-Parameter neben dem Modulnamen auch die Dokumentvorlage, in der das Modul enthalten ist, angegeben werden, sofern nicht die aktive Vorlage ActiveVBProject verwendet wird. Zusätzlich muss der Dateiname, in den das Modul, die Form oder die Klasse exportiert werden soll, angegeben werden. Wird der Dateiname ohne zusätzliche Pfadangabe verwendet, wird die Datei im Vorlagenverzeichnis gespeichert.

1    Sub ModulExport()
2    Dim sTemplate, sCompo, sName As String 
3    sTemplate = "Normal"
4    sName = "Modul1"
5    sPfad = "c:\temp\" & sName & ".bas"
6    Application.VBE.VBProjects(sTemplate).VBComponents(sName).Export (sPfad)
7    End Sub