Originally Posted by macropod

You don't need VBA for this. All you need do is define paragraph Styles that meet your requirements, then use Find/Replace to apply those Styles to the paragraphs concerned.