Check if there is more than one font color used in a document

		Microsoft Office Forums > Microsoft Word > Word VBA
Check if there is more than one font color used in a document

FAQ

Thread Tools

Display Modes

01-26-2019, 10:49 PM

macropod

Windows 7 64bit Check if there is more than one font color used in a document

Office 2010 32bit

Administrator

Join Date: Dec 2010

Location: Canberra, Australia

Posts: 22,384

Testing whether a document uses more than one font colour or highlight is as simple as:

Code:

Sub Demo()
With ActiveDocument.Range
  MsgBox "Font Colour: " & .Font.ColorIndex
  MsgBox "Highlight Colour: " & .HighlightColorIndex
End With
End Sub

If the returned value is 9999999 for either, there is more than one of that property in use (no highlight counts as one).

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
VBA change font color to background color	donaldadams1951	Word VBA	6	05-31-2018 04:36 PM
Advanced Font Color Manipulation In Word: Inserting another color than the surrounding text	stuartg	Word	1	02-20-2017 12:38 AM
Remove white text background (keeping the font color and page color intact	cc3125	Word	1	10-26-2015 06:44 PM
Font Color Question//.Replacement.Font.Color = 12611584	rsrasc	Word VBA	3	09-05-2015 09:03 PM
Make a certain font face and font color as default in a document.	Singh_Edm	Word VBA	2	09-13-2014 08:47 PM