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
open イベントは、それらが満たされる前に発生します。このプロセスを自動化するつもりなので、できれば人間の介入なしで、その後に1つ必要です。
タグがあるドキュメント内のマクロの VBA ソリューションが必要です。