All you need do is change the Find expression, to:
.Text = "<[0-9]@."
and change:
.Text = i & "."
PS: when posting code, please use the code tag (indicated by the # button), not the PHP tag (indicated by the PHP button).
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
|