How do you get a macro not to go to or change a locked cell?

[bxs02205]

I have the cells locked, the sheet protected and have only "Select unlocked
cells" and "Format cells" checked. If I turn "Format cells" off, the macro
doesn't work. Below is the macro:
Selection.Interior.ColorIndex = 4
Selection.Font.ColorIndex = 1
ActiveCell.Offset(1, 0).Range("A1").Select

It changes the fill to green, the text to black, and move down one row.

Please help.........

 

[Tom Hutchins]

I'm not clear what you are trying to accomplish. Do you want your macro to be
able to change only an unlocked cell to green, then move down one cell if
that cell is also unlocked? If so, try this:

If ActiveCell.Locked = True Then Exit Sub
Selection.Interior.ColorIndex = 4
Selection.Font.ColorIndex = 1
If ActiveCell.Offset(1, 0).Locked = True Then Exit Sub
ActiveCell.Offset(1, 0).Select

Hope this helps,

Hutch

 

[bxs02205]

YES It worked great. You're a genius.

Thanks tons.