✔ [Makro] vorhandene Datei an aktives Dokument anhängen.

[amn.ssy]

Hallo,

seit ein paar Tagen suche ich schon nach einer Alternative unter Ooo/LibO für den folgenden VBA-Code

Sub DocTor_Click()
'ActiveDocument.Unprotect
If ActiveDocument.ProtectionType <> wdNoProtection Then ActiveDocument.Unprotect

Selection.EndKey Unit:=wdStory
    Selection.InsertBreak Type:=wdSectionBreakNextPage
    ChangeFileOpenDirectory "D:\Kunden\xxx\Formulare\"
    Selection.InsertFile FileName:="PP_TorTK.doc" _
        , Range:="", ConfirmConversions:=False, Link:=False, Attachment:=False
       
ActiveDocument.Fields.Update

ActiveDocument.Protect Type:=wdAllowOnlyFormFields

Sinn der "Übung" ist der, dass ich dem Hauptformular uber die Button A,B oder C die Anlage A,B oder C am Schluß hinzufügen möchte, so daß aus dem ursprünglichen Dokument mit 1 Seite eins mit x Seiten wird.

Bisher hab ich mir die Themen globales Dokument und insertDocumentFromURL angeschaut. Das scheint aber nicht unbedingt zielführend zu sein oder ich verstehe die Beispiele mit meinen bescheidenen VBA-Kenntnisse nicht so recht.

Ich freue mich auf Ideen und Vorschläge

Grüße
_opiWahn_

 

[HonniCilest]

Das scheint aber nicht unbedingt zielführend zu sein

Was genau ist daran nicht zielführend?

 

[amn.ssy]

Was genau ist daran nicht zielführend?

... oder ich verstehe die Beispiele mit meinen bescheidenen VBA-Kenntnisse nicht so recht.