You can easily enough test for all fonts, including Arial, by deleting the 'If sTempName <> "Arial" Then' test (and its 'End If').

Testing by font size introduces a major overhead, as a font can be anywhere from 1pt to 1638pt, in 0.5pt increments. Testing all (or even a significant range of these) possibilities will slow your code down quite dramatically. Suppose, for example, you only want to test for all sizes from 6pt to 24pt, inclusive. That will make the code take about 37 times longer to run than it now takes.

PS: When posting code, please use the code tags. They're on the 'Go Advanced' tab.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]