hoja portegida

Tengo este codigo q resalta las filas de la hoja en la q trabajo pero le acabo de poner autofiltro para una mejor busqueda pero no se puede usar porq la hoja esta protegida y debe de estar asi me podrian ayudar para q la hoja trabajara bien estando ...

tengo el sig macro, Case Is = "b" For Each cell In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants, 2).Cells cell = LCase(cell) Next cell debido a que la hoja esta portegida y algunas celdas bloqueadas, al ejecutarlo me marca ...