Proteger hoja con macro automaticamente

Este es un sencillo codigo vba que permite proteger de forma dinámica una hoja de Excel con contraseña.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
ActiveSheet.Protect Password:=[Z999]
ActiveWorkbook.Save
Save
End Sub

Private Sub Workbook_Open()
[A1].Select
End Sub

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *