I recorded a macro and it turns out like this:

Sub SpecialFind()
'
' SpecialFind Macro
'
'
Selection.Find.ClearFormatting
With Selection.Find
.Text = "\<value\>*\</value\>"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
End Sub

Now all I have to do is count all the word in the selection(s) and then distract all instances of the word "value". I do not know how to do that yet but I will have a look. Any suggestion is welcome!