Hallo Zusammen,

ich hoffe es geht allen gut.

Ich habe leider ein Problem.
Ich habe eine Makro die immer funktioniert hat.
Ich lasse jetzt nur in meiner Word-Datei die Textmarken automatisch von Excel anlegen und auch die Namen der Textmarken in Word.(Bei jeder Word-Datei heißen die Textmarken anders. Die Textmarke Summe heißt aber immer Summe.)
Jetzt ist es aber so, wenn ich das Makro im Anhang aktiviere kommt immer der Fehler
Laufzeitfehler '9' Index außerhalb des gültigen Bereichs
In der Zeile ReDim arrWerteTxT(1 To UBound(arrTMTxt) + 1)

Kann mir da jemand Helfen, das die Makro wieder den Inhalt der Zellen in die jeweiligen Textmarken überträgt.
In Spalte B sollen die Daten von der Excel in den Buchstabenbereich cvx() in der Word-Datei übertragen werden.
In Spalte P bzw. Spalte E sollen die Daten von Excel in den Buchstabenbereich zys(-) in der Word-Datei übertragen werden.
Die Textmarke Summe in der Word-Datei heißt immer Summe und dort soll die Summe immer übertragen werden.
Im Anhang findet Ihr die Excel mit der Makro und die Word-Datei mit den automatisch erzeugten Textbausteinen.

Danke für die Hilfe.

Anhang
https://www.herber.de/bbs/user/171884.zip