隐藏模块中的编译错误：抬头

Question

我得到：

  

在隐藏模块中编译错误：信头。通常会发生此错误   当代码与版本，平台或版本不兼容时，   此应用程序的体系结构。

我正在使用Word2016。我的代码在ActiveDocument.AttachedTemplate_处停止。见下文。

If OptionAtl.Value = True Then ActiveDocument.AttachedTemplate _
    .BuildingBlockEntries("\Atlanta") _
    .Insert _
    Where:=ActiveDocument.Bookmarks("OffAddressBlock").Range, _
    RichText:=True