I have a worksheet that many users use. I set up the worksheet so that the users can enter data into certain cells that have a Gray background color. The rest of the cells (the rest contain formulas by the way) are protected and cannot be modified.

I have written a macro that automates the manual data entry into the grayed out cells. The following is one block in the code:

ActiveCell.Offset(-7, 2).Select
ActiveCell.Formula = "=AD39"
ActiveCell.Offset(3, 0).Select
ActiveCell.Formula = "=AB42"
ActiveCell.Offset(1, 0).Select
ActiveCell.Formula = "=AB44"
ActiveCell.Offset(1, 0).Select
ActiveCell.Formula = "=AB42"
ActiveCell.Offset(1, 0).Select
ActiveCell.Formula = "=AG37"
ActiveCell.Offset(1, 0).Select
ActiveCell.Formula = "=AG39"

Each time the active.offset happens, it moves to the next grayed out cell. After this block is done, I'm wanting to do a paste special - paste values into these cells based on background color (gray), so I can delete the extra columns (AB, AD, AG, etc..).

Basically, if the cells background color is gray: copy then paste value back into the cell.


I hope this is a good enough explanation!!

Thanks in advance for any help.


DejaVu