Option Explicit 'hier eigentlich wurst
 
Sub AutoNew()
 
'Import des Moduls
 
Dim sName As String
sName = ActiveDocument.AttachedTemplate.Path & "\Kopf032.bas"
ActiveDocument.VBProject.VBComponents.Import (sName)
 
'Aufruf einer Routine um die Hauptroutine aus dem importierten Modul aufzurufen 
' (evtl. überflüssig?)
 
Call RunKopf032Main
 
End Sub
 
Sub RunKopf032Main()
'Ruft die Hauptroutine aus dem importierten Modul auf
 
Call main
 
End Sub