我有一个带有 xml 标签的 word 文档。这些标签由应用程序填充,打开文档填充它们并将文档转换为 pdf 并将其发送到文件共享应用程序。
我的问题是文档有表格和文本,其中的标签将为空。我想在“填充”事件之后检查这些标签并隐藏包含它的段落,但我没有这样做的事件。
我有下面的代码来检查标签值,所以我可以查看它们是否为空,但我不知道我可以把它放在哪个事件中。到目前为止,我发现执行代码的唯一一个是打开的文档,如下面的代码所示。其他不触发。
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 解决方案来解决我有标签的文档中的宏。