Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
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......... |
#2
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
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" wrote: 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......... |
#3
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
YES :-) It worked great. You're a genius.
Thanks tons. "Tom Hutchins" wrote: 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" wrote: 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......... |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Can you run a macro while your computer is locked? | Excel Discussion (Misc queries) | |||
macro that will change the font of a cell if i change a value | Excel Discussion (Misc queries) | |||
change locked cell if | Excel Discussion (Misc queries) | |||
run a macro in a locked cell | Excel Discussion (Misc queries) | |||
Locked Macro Project | Excel Discussion (Misc queries) |