Change Column Font Color Based on Header

[Michael151]

<!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:Compatibility> <w:BreakWrappedTables/> <w:SnapToGridInCell/> <w:WrapTextWithPunct/> <w:UseAsianBreakRules/> </w:Compatibility> <w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel> </w:WordDocument> </xml><![endif]--><!--[if gte mso 10]> <style> /* Style Definitions */ table.MsoNormalTable {mso-style-name:"Table Normal"; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-parent:""; mso-padding-alt:0in 5.4pt 0in 5.4pt; mso-para-margin:0in; mso-para-margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:10.0pt; font-family:"Times New Roman";} </style> <![endif]--> Hello all,

Trying to write a macro that will change the color and font of a particular column based on the header in row 1.

For the column labeled New_Deal, anything in this column starting in row 2 will be changed to red and bold font.

Before:

Row1 Col1 New_Deal
Row2 Col2 Col2
Row3 Col3 Col3
Row4 Col4 Col4
Row5 Col5 Col5

After:

Row1 Col1 New_Deal
Row2 Col2 Col2
Row3 Col3 Col3
Row4 Col4 Col4
Row5 Col5 Col5

The “New_Deal” column can be in any column letter, which is why I’d like to use the header in row 1 to identify this column.

Any help is most appreciated – thanks!

 

[Dryver14]

If there are no criteria involved why not just format col 2 on the page?

 

[Michael151]

The New_Deal column is not always in column 2, it can be in any letter column, which is why I'd like to use the header in row 1 to identify this column.

I'm also trying to incorporate this function into a larger macro and I'm trying to automate most of the process.

 

[Dryver14]

how far have you got with this Macro as it appears you are asking for that part further down this page,

In it you say insert a column and then it does not matter where it is,

I would need to understand fully what you want and then I should be able to help

So far it looks to me that you could write New_Col 2 in col b format the column red and bold and copy and paste down.

which by the way is fine but put it all together.

 

[Michael151]

Sure, this might make it easier - let me rephrase:

In the column labeled "New_Deal", (which can be in any letter column - identified by row 1 header), any instance of the word "New" in this column should be bold red.

Does that make sense?