Formatting Macro inside of Word

J

JMPrice

Hi everyone

I'm an intern at a PR company and part of my job is to collect and format hundreds of internet news clips, basically all the coverage for our relevant client. There is a standard formatting I have to apply: the whole document in Arial 12, with the headline, as the first line of the document, in bold. Is there some way that I could set up a one-button macro to go through a document I open up and apply this standard formatting

Any help would be much appreciated. You'd be saving me hours of work

Thanks

Joe
 
G

Graham Mayor

That's fairly straightforward
Create two paragraph styles here Style1 & Style2 - Style2 is 12 point
Arial - Style 1 is 12 point Arial Bold
Create a macro containing the following and add it to a toolbar button
(http://www.gmayor.com/installing_macro.htm)

Sub FormatWeb()
On Error GoTo Oops
Selection.PasteSpecial Link:=False, DataType:=wdPasteText, Placement:= _
wdInLine, DisplayAsIcon:=False
Selection.WholeStory
Selection.Style = ActiveDocument.Styles("Style2")
Selection.HomeKey Unit:=wdStory
Selection.Style = ActiveDocument.Styles("Style1")
End
Oops:
Beep
End Sub

Copy your web info to the clipboard - open Word and hit the button.

--
<>>< ><<> ><<> <>>< ><<> <>>< <>>< ><<>
Graham Mayor - Word MVP

Web site www.gmayor.com
Word MVP web site www.mvps.org/word
<>>< ><<> ><<> <>>< ><<> <>>< <>>< ><<>
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top