Vba 运行时错误：无法读取WordBasic命令

我有一个宏，它具有以下Wordbasic调用：

    WordBasic.StartOfDocument

    WordBasic.SetDocumentDirty 0

    WordBasic.SetTemplateDirty 0

当我运行代码时，会出现运行时错误：-这些命令在word 2013中不可读取。然而，它在Word的其他版本中运行良好。 有很多对WordBasic的调用，但我用ActiveDocument调用改变了它们

有没有办法用ActiveDocument更改这些调用

Selection.HomeKey Unit:=wdStory
ActiveDocument.Saved = False
ActiveDocument.AttachedTemplate.Saved = False

此外，在Word 2013中，默认情况下在阅读视图中打开文档。在这种情况下，您可能需要允许通过设置

ActiveWindow.View.ReadingLayout = False

---

非常感谢你的意见。我已使用此更改了代码，但在选择中出现错误。HomeKey Unit:=wdStory，其显示运行时错误4605:此命令无法读取。当我评论这一行时，其余两行运行良好。我是这方面的初学者，所以无法理解这个问题。请帮忙@Iari：我应用了你建议的编辑（有一些小的变化），因为它们对我来说似乎完全合理。我将很快删除此评论。