Proteger una hoja de cálculo desde una macro

Para proteger una hoja de cálculo desde una macro, sin contraseña, escribiremos:

Sub Protege_hoja()
    ActiveSheet.Protect DrawingObjects:=True
End Sub


Para desproteger la hoja el código a introducir será:

Sub Desprotege_hoja()
    ActiveSheet.Unprotect
End Sub
Anuncios

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión /  Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión /  Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión /  Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión /  Cambiar )

w

Conectando a %s