VBA Word Macro: Shorten Lines

I created this VBA macro for Microsoft Word so that I could insert paragraph returns at suitable places in a doc in order that each line was no more than 80 characters (so that when I send it to bloomberg it formats properly).

I'm sure this could be prettier but then again I don't hack for a living...
http://blog.stickyrice.net/wordmacro/

Some key words...
wdCharacter,
If Selection.Text = Chr(13)
Selection.TypeParagraph

Labels: hacking, macro, VBA, word