Printing style names next to text

[Guest]

How do I print both the text and style names that appear When I am working in
outline or normal view and have the styles displaying on the left side of the
page? If I choose Print>Print | Styles I just get a printout of all the
styles in my document.

 

[Herb Tyson [MVP]]

While you can display the style name using the Style Area Width setting,
there is no built-in mechanism for printing the style names in that fashion.
If it were a very short document, you could do it by using screen shots,
then carefully cropping out the parts you don't want, but I suspect that
that's a bit more work than you have in mind.

 

[Daiya Mitchell]

Depending on what you need it for--there is a macro around, by MVP Doug
Robbins, that will insert the Style Name at the beginning of each paragraph.

RUN ON A COPY--it will change your layout and add text to your
document.

Dim apara As Paragraph
 For Each apara In ActiveDocument.Paragraphs
     apara.Range.InsertBefore apara.Style & " - "
 Next apara

If you don't know what to do with this, see here:
What do I do with macros sent to me by other newsgroup readers to help me
out?
I don't know how to install them and put them to use
http://word.mvps.org/FAQs/MacrosVBA/CreateAMacro.htm

Guide to Installing Macros
http://www.gmayor.com/installing_macro.htm

Taken from this thread [link may break]:
http://groups.google.com/group/microsoft.public.word.docmanagement/browse_fr
m/thread/38e46597fdac2a91/c64c1080f98f3dae