loop thru cells in column and depending on cell value, populate another cell with a value

can someone help me with my macro? i need to loop thru cells in column A and depending on each cell's value, populate another column's cell with a value i need to hardcode in the macro using a case statement.

attached is a workbook containing a macro MODULE3.OPAY showing my attempt (which is poor, i know). the way it is now, the macro populates the whole column A with 16750, but i need to have it place column header 'COID' in Q2, then place the new values in column Q.

thanks so much in advance for your assistance!!

Pam White
[email protected]

Not sure if this helps or not. I may have misunderstood.

Please Login or Register  to view this content.

thanks!! this works perfectly for the first 4 cases, but the last 3 need to be mid(11,3) so the case left c,3 doesn't pick up the right characters. thoughts?

ranman256,
the "SUM" "TRO" "RIV" etc are strings of text in the col A cells (partial values). for the first 4 cases, i need to look at the first 3 characters but for the last 3, i need to look at the 11th, 12th and 13th characters. were you able to look at my attached file? thanks so much!!

ranman256,
I changed the code to be the exact value of text in col A cells and it works perfectly. how can i set q2 to "COID" (a header)?

Originally Posted by pwhite

ranman256,
the "SUM" "TRO" "RIV" etc are strings of text in the col A cells (partial values). for the first 4 cases, i need to look at the first 3 characters but for the last 3, i need to look at the 11th, 12th and 13th characters. were you able to look at my attached file? thanks so much!!

Try:

Please Login or Register  to view this content.