在word中填充XML标记后在VBA中发生的事件

我有一个word文档，里面有xml标记。这些标记由打开文档的应用程序填充，填充它们并将文档转换为pdf并发送到文件共享应用程序

我的问题是文档中有表和文本，这些标记将是空的。我想在filling事件之后检查这些标记，并隐藏包含它的段落，但我没有该事件来执行此操作

我有下面的代码来检查标签值，这样我就可以看到它们是否为空，但我不知道在哪种情况下我可以把它放进去。到目前为止，我发现唯一一个执行代码的是打开的文档，如我在下面的代码中所示。其他的都没有触发

    Private Sub Document_Open()
        ValidateTags
    End Sub

    Sub ValidateTags()
        Dim r As XMLNodes
        Dim i As Integer

        Set r = ActiveDocument.XMLNodes
        i = 0
        Do While i < 10
            i = i + 1
            If i = 10 Then Exit Do
            MsgBox (r(i).BaseName & "  #  " & r(i).NodeType _
            & "  #  " & r(i).NodeValue & "  #  " & r(i).Text)
        Loop
    End Sub

打开事件发生在填充之前。在那之后我需要一个，最好没有人的互动，因为我希望这个过程是自动的

---

我需要VBA解决方案来解决文档中的宏，其中我有标记。

请尝试documentbeforesave事件：