Hallo zusammen

Ich habe folgendes Problem: Auf dem Word Dokument  (Office 365 Apps for Enterprise) befinden sich mehrere ContentControl kästchen. Aus zwei der Kästchen (Im Tag angegeben mit Text1 & Text2) möchte ich die Datei nach Drücken vom cmd Button automatisch das Dokument in einem Ordner abspeichern. Folgenden Code hab ich im Internet gefunden. Allerdings wird aus Textfeldern ausgelesen anstatt wie bei mir aus ContentControl, weshalb ich nach ActiveDokument statt .Bookmarks .ContentControlls eingesetzt habe:

Private Sub CommandButton1_Click() 
Dim Pfad, Datei 
Pfad = "C:\test" 
Datei = ActiveDocument.ContentControls("Text1").Range.Text & "-" & _ ActiveDocument.ContentControls("Text2").Range.Text & ".dotm" 
ActiveDocument.SaveAs Pfad & Datei 
End Sub

Das System meldet mir "ungültiger Parameter" bei der Linie Datei =

Wer kann mir da weiterhelfen?