![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
Module importieren und exportieren |
![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
|||||||||||||||||||||
![]() |
|
![]() |
Module importierenMit 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 exportierenZum 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 |
![]() |
![]() |
Besucher: 1 online | 136 heute | 2076 diesen Monat | 1941959 insgesamt | Seitenaufrufe: 68 | ![]() |
Letzte Änderung: 24.06.2006 | ![]() |
© 2001-18 Christian Freßdorf | ![]() |
Demokratie ist die wiederholt auftauchende Vermutung, daß mehr als die Hälfte der Leute in mehr als der Hälfte der Fälle recht haben. E. B. White |
powered by phpCMS and PAX |