Macro de bloqueo al introducir valor que permita usar autofiltro
Tengo esta macro que me permite que una celda pase de desbloqueada a bloqueada al introducir un valor, pero al bloquear automáticamente la hoja no me permite usar el autofiltro.
Private Sub Worksheet_Change(ByVal Target As Range)
Hoja1.Unprotect "123"
Target.Locked = True
Hoja1.Protect "123"
End Sub
¿Podríais decirme cual es el paso para que al bloquear permita usar el autofiltro?
3 Respuestas
Respondiendo a tu pregunta:
¿Podríais decirme cual es el paso para que al bloquear permita usar el autofiltro?
Debes tener ya aplicado el autofiltro antes de proteger la hoja. Luego la macro que te pasaron en respuesta anterior irá bloqueando las celdas que vayas modificando. Y podrás utilizar el autofiltro..
Pero si no tenías aplicado el autofiltro al momento de proteger la hoja, no te permitirá aplicarlo luego.
Prueba así:
Private Sub Worksheet_Change(ByVal Target As Range) Hoja1.Unprotect "123" Target.Locked = True Hoja1.Protect "123", DrawingObjects:=True, Contents:=True, _ Scenarios:=True, AllowFiltering:=True End Sub
Recomendación:
Sal u dos
Dante Amor
¡Gracias!
Efectivamente, estaba poniendo el comando AllowFiltering en la fila de abajo, en vez de detrás de la contraseña.
Al final queda así y me permite bloquear y usar filtro:
Private Sub Worksheet_Change(ByVal Target As Range)
Hoja1.Unprotect "123"
Target.Locked = True
Hoja1.Protect "123", AllowFiltering:=True
End Sub
I. Hola Nerea, por mi parte no soy conocedor, pero creo que la experta Elsa Matilde respondió a su duda en anteriores consultas, si lo desea podría verlas aquí,
Quisiera trasladarle la información que vi sobre su consulta por si pudiese serle de alguna utilidad mientras le atiende un experto de primera mano. Le ruego disculpe la imprecisión y molestias de lectura, ánimo.
https://excel.foroactivo.com/t458-activar-y-desactivar-filtro-en-hojas-protegidas
https://stackoverflow.com/questions/75671323/vba-code-to-protect-worksheet-but-allow-filtering
https://www.reddit.com/r/excel/comments/rrwacl/vba_macro_with_enabled_autofilter_grouping_and/
https://stackoverflow.com/questions/44830886/excel-advanced-filter-with-protected-sheet
https://www.exceleinfo.com/permitir-ordenar-filtrar-y-agrupar-en-hojas-protegidas-en-excel/