Proteger hojas y filtros
Hola a todos, y gracias por leer este mensaje. Tengo una hoja de excel con filtros, cuando protejo la hoja los filtros no me funcionan. Hay alguna manera de solucionar el problema. Gracias de antemano
1 Respuesta
Respuesta de jgirj
1
Directamente no se puede, ero podrías utilizar una macro, ejemplo:
Si tus columnas filatradas están entre A y DE, entonces agrega el siguiente código en el evnto Selection_Change del objeto WorkSheet:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Target.Column
Case 1 To 4 'columnas 1 a 4 o A a D
If Target.Row = 1 Then 'Si el usuario selecciona el encabezado de la columna
ActiveSheet.Unprotect "Password"
End If
Case Else 'El resto de columnas
On Local Error Resume Next
ActiveSheet.Protect "Password"
End Select
End Sub
Si no funciona escribe de nuevo
Si tus columnas filatradas están entre A y DE, entonces agrega el siguiente código en el evnto Selection_Change del objeto WorkSheet:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Target.Column
Case 1 To 4 'columnas 1 a 4 o A a D
If Target.Row = 1 Then 'Si el usuario selecciona el encabezado de la columna
ActiveSheet.Unprotect "Password"
End If
Case Else 'El resto de columnas
On Local Error Resume Next
ActiveSheet.Protect "Password"
End Select
End Sub
Si no funciona escribe de nuevo
