View Single Post
 
Old 05-05-2018, 05:06 PM
kkkwj kkkwj is offline Windows 10 Office 2016
Novice
 
Join Date: Nov 2017
Posts: 6
kkkwj is on a distinguished road
Default Set color and background of special bullet in table cell

Hi, I work with tables that contain special characters / shapes in table cells. The color of the shape/icon indicates yes, no, inactive, in-progress, etc. And I have to change the fill color of the table cell if I change the state (color) of the Wingding symbol. It's a huge pain to do all this with the mouse, right-clicking, etc. I'd like to bind a macro to a keybinding.

I'm having a hard time finding the code to do the color changes. I can't record a macro with the symbol selected (the macro doesn't record right-click mouse ops, etc.).

I've tried things like
Code:
   Selection.Font.Fill.ForeColor = wdRed
   Selection.Font.Fill.BackColor = wdGreen
   Selection.ShapeRange.Item(1).Fill.ForeColor = wdBlue
but without success. Could someone point me in the right direction (or better yet, show code) to change the color of the selected symbol and the background color of the table cell that holds the selected symbol? (I don't know if selecting something in a cell automatically selects the cell object too...)

Thank you
Reply With Quote