录制的插入“目录”宏在重新启动word后无法使用

多久多少

各位大神，录制了个宏要在文章内插入“目录”。可是如果关闭程序再次打开word后该宏3无法使用，提示如下信息。请问如何解决？（任何设置、路径均未改变）

    Selection.HomeKey Unit:=wdStory
    Selection.EndKey Unit:=wdLine
    Selection.MoveDown Unit:=wdLine, Count:=1
    Selection.InsertBreak Type:=wdPageBreak
    Selection.MoveLeft Unit:=wdCharacter, Count:=1
   Application.Templates( _
        "C:\Users\William G\AppData\Roaming\Microsoft\Document Building Blocks\2052\14\Built-In Building Blocks.dotx" _
        ).BuildingBlockEntries("自动目录 1").Insert Where:=Selection.Range, RichText _
        :=True
    Selection.TypeBackspace
    Selection.WholeStory
    Selection.Font.Color = wdColorAutomatic


问题2：该附件里的模块2是否可以用宏代替？如果可以的话，请问该如何编写？

以上，谢谢了。