Hi,

I am using this macro to bold all my locked cells and it
crashes Excel unless I restrict its range to very small
areas. I would like to let it run through the entire
workbook. Can someone help me clean up the code so it
does not crash?


Thanks,


Todd




Sub BoldLocked()
For Each cell In Selection.Cells
If cell.Locked = True Then
cell.Font.Bold = True
End If
If cell.Locked = False Then
cell.Font.Bold = False
End If
Next cell
MsgBox "No more cells to check"
End Sub