|
|
#3
04-19-2022, 03:40 AM
|
|||
|
|||
Solved it - Just removed the one from the r.cells(1).shading.BackgroundPatternColor = wdOrange row.
 [Sub AmberText() Dim r As Range, wdOrange As Long wdOrange = 41215 Set r = ActiveDocument.Range With r.Find Do While .Execute(FindText:="Amber", MatchWholeWord:=True, Forward:=True) = True r.Cells.Shading.BackgroundPatternColor = wdOrange Loop End With End Sub] 
|
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
 Cell text color vs cell background color
|
AC PORTA VIA | Excel Programming | 4 | 12-19-2018 04:01 PM |
| Allow Cell Background Fill/Text Color Change while Protected Sheets are Grouped | RaudelJr | Excel | 5 | 04-18-2017 11:11 PM |
| Traffic light help needed | wmedjaxnjr | Excel | 1 | 04-08-2016 09:04 AM |
|
VBA Table – Search All Tables - Find & Replace Text in Table Cell With Specific Background Color
|
jc491 | Word VBA | 8 | 09-30-2015 06:10 AM |
|
Cell Background Color: Base it on Content of Cell?
|
tatihulot | Excel | 4 | 08-14-2013 03:24 PM |
Mac OS X 
Office 2021
Threaded Mode