Proteger varias hojas al mismo tiempo en Excel
La siguiente macro resuelve el problema cuando tenemos varias hojas de trabajo y tenemos la necesidad de proteger todas. Dada la misma situación, pero para desprotegerlas.
Sub protect_all() For Each sht In ActiveWorkbook.Sheets sht.Protect Password:="test" Next sht End Sub ' Sub unprotec_all() For Each sht In ActiveWorkbook.Sheets sht.Unprotect Password:="test" Next sht End Sub
Ver video Proteger hojas en Excel usando macros VBA
Suscríbete al canal de EXCELeINFO en YouTube para aprender más de Excel y macros.
Me funcionó hermano, justo lo que necesitaba, GRACIAS.
Qué bueno que te fue de utilidad.
Estimado Sergio
Funciona correctamente y me fue de muchisima utilidad.
GRACIAS.
Que bueno que te ha sido de utilidad.
En el addin de Blog viene la misma utilidad, pero con más opciones, incluyendo la alección de hojas a proteger.
Te paso el link http://exceleinfo.wordpress.com/2011/08/06/exceleinfo-add-in-2-2-8-proteger-varias-hojas-a-la-vez-con-contrasea/
EXCELENTE!!!!!!!!!!