Change the oDoc.SaveAs2 line to
Code:
oDoc.SaveAs2 FileName:=strPath & strFileName & ".docm", Fileformat:=wdFormatXMLDocumentMacroEnabled
to save a working version of the saved document.
You may find
https://www.gmayor.com/insert_content_control_addin.htm useful when working with content controls