#1
|
|||
|
|||
Automate formatting
Hi,
I want to format every "course" like what's shown in the picture or the document below |
#2
|
||||
|
||||
You can do this with a regular search and replace. Recording this as a macro would end up something similar to this
Code:
Sub HiLiteCourses() Options.DefaultHighlightColorIndex = wdYellow With Selection.Find .ClearFormatting .Replacement.ClearFormatting .Replacement.Highlight = True .Replacement.Font.Color = wdColorRed .Text = "course" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = True .Execute Replace:=wdReplaceAll End With End Sub
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
Thread Tools | |
Display Modes | |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Macro to automate changes to slide | Mearsy | PowerPoint | 0 | 08-18-2015 03:29 AM |
Automate document properties | Ted C | Word VBA | 11 | 08-04-2014 06:31 AM |
Automate Office Attendance | kgwack | Outlook | 0 | 02-14-2012 09:39 AM |
How to automate all slides | Pemberton | PowerPoint | 1 | 11-09-2011 04:39 PM |
Can I automate or make a macro for this? | mkoenig | Word VBA | 1 | 01-31-2010 02:47 AM |