vba Find specific text font and change color

Hi everyone
I am just started learning about VBA, but I need a little help, here in the beginning.

I need help for a code, that can find data for me in the excel ark.
The code need to do the following.
• Find all the cells in column “D” that contains text with the text font “Calibri “
Then color the cell in column “G” and in the same row.

For more information see the picture.

Thank you for your time

14-01-2014 22-39-58.png

HI GreyGhost

Thank you for your fast reply.
1: From the dialog would be perfect
2: The Columns we always be “D” and “G”
3: The Macros have to process all data in Column “D” ex. From “D1” to “D2000”
4: I am using Excel 2010

As you properly have figured out, I am new ad VBA.
My plan is to get started with this code and the build on to it.
If you need more information, just ask me again.
Thank you for your help.

jacgeld

This code is more versatile...

• Column numbers are constants in the macro, so you can easily change the two fields in the future
• Font name and Size are Constants, easily changed if required
• Does not use "Selection" method/object -- process time is monumentally faster.
  Selecting each cell in a loop is not efficient
• Clears cell fill-color from any cells in Column- "G" that do not meet the criteria.
  Only cells that do meet the criteria are colored
• Uses "UsedRange" rather than terminating at first empty cell, else some cells could be be missed
• Is designed to work with an island of cells, not necessarily cells starting in row(1)
• Screenupdating, is manipulated to speeden up process time, monumentally faster on large lists
• Any errors are trapped and a msg shown, outlining the error number + its description, avoiding user shock if an error occurs.

Please Login or Register  to view this content.