Conditionally fill color base on cell value in Column A with VBA

[primala]

Hi,

I need to apply fill color "green" for the entire row (from column A to G) only if a cell value in column A contains with "111200317" or it might be better if could refer to cell A1 (cell value in A1 is 111200317). How to do it with VBA?

Regards

 

[Andrew Poulsom]

Can't you use Conditional Formatting with a formula like?

=$A1=111200317

I don't see the need for VBA.

 

[primala]

Dear Andrew Poulsom,

Thanks so much for your kind assistance. I am working in project closeout, do material reconciliation and in the end validate what's the charges in and out within account 111200317. All of the transactions is noted in a batch number, and for one account (111200317) could have more than 400 batch numbers it means 400 excel files that I have to exercise. From and to which account charges related to.

By the way, I've tried your suggestion with 3 records below :
A1 = 111200317
A3 = 111200317.251000.2341
A4 = 111000239
A5 = 111200317.251000
A6 = 111000239
A7 = 111200317

and the formula in Conditional Formatting is =A$1, and applied to A3:A10 but all fill color turn into Green. Is there any mistake I made?

Thanks in advance

 

[Andrew Poulsom]

Just remove the $ sign from A$1. It fixes the row reference which I thought is what you wanted.

 

[primala]

Dear Andrew,

Thanks for your attention and solution. Problem solved. Again, thanks so much.

Regards