need help creating a Word macro selecting all and changing font, size, and color thanks

macropod · #2 12-08-2018, 09:34 PM

You should not be modifying a document that way. rather, you should create a Style with the desired characteristics (or modify an existing one) and apply that. For example, the following macro does what you ask by modifying & applying Word's 'Normal' Style:

Code:

Sub FormatActiveDocument()
Application.ScreenUpdating = False
With ActiveDocument
  With .Styles(wdStyleNormal).Font
    .Name = "Arial"
    .Size = 14
    .ColorIndex = wdDarkBlue
  End With
  With .Range
    .Style = wdStyleNormal
    .ParagraphFormat.Reset
    .Font.Reset
  End With
End With
Application.ScreenUpdating = True
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
When changing table style in Word 2010, font size seems to change but doesn't show in new tables	heartsoulliving	Word	1	12-07-2016 05:17 PM
Word macro doesn't change font color	Spideriffic	Word VBA	8	11-04-2015 03:47 AM
Changing the commentary font size in WORD 2013 to a larger one	MikeD	Word	3	06-01-2014 03:40 AM
MAcro to List all the Font & its size in a word document	shaukat74	Word VBA	1	01-29-2013 09:34 PM
changing font size without changing leading	carolns	Word	1	09-14-2009 12:30 PM