Thread: Set color and background of special bullet in table cell
View Single Post
 
Old 05-08-2018, 02:25 AM
slaycock slaycock is offline Windows 7 64bit Office 2016
Expert
  
Join Date: Sep 2013
Posts: 255
slaycock is on a distinguished road
Default
You need to identify the cell that has been selected.

Code:
With Selection.Range.Cells(1)
    .Range.Characters.First.Font.ColorIndex = wdGreen
    .Shading.Texture = wdTextureNone
    .Shading.ForegroundPatternColor = wdColorAutomatic
    .Shading.BackgroundPatternColor = wdColorOrange
End With
You can if you wish change .colorindex to .color. The .color property has been deprecated so no longer shows up in the intellisence but is still a fully functional property.
Reply With Quote