Saltar al contenido

macro proteger hoja a una hora y desprotegerla a otra

publicado

buenos días, no sé si será posible crear una macro para que a una hora determinada proteja una hoja y a otra hora la desproteja? gracias anticipadas.

Featured Replies

publicado
  • Autor

Gracias por contestar, diste en la tecla, cuando está abierto me funciona, lo deseo para cuando lo abra después de la hora fijada de cierre esté protegido y no se pueda DESPROTEGER hasta la hora de inicio.

publicado

Lee sobre el evento "Open" del libro, asimismo, ordénate un poco, por ejemplo si para ti la hora de inicio es 1:00 p.m., entonces, si abro el archivo a las 2:00 p.m. se queda protegido ¿pero si lo abro a las 2:00 a.m. o similar? Se entiende, además, que la clave de protección solo la tienes tú y que también sabes que mucha gente podría averiguarla tan solo entrando a tus macros ¿de acuerdo? Por cierto ¿en qué nivel de VBA estás? No has enviado ningún intento o avance.

publicado
  • Autor

hola gracias por el interés, tengo lo siguiente

en ThisWorkbook tengo lo siguiente:

Private Sub Workbook_Open()

Application.OnTime TimeValue("21:00:00"), "proteger"

Application.OnTime TimeValue("09:00:00"), "desproteger"
End Sub


en modulo  lo siguiente:

Sub proteger()
ActiveSheet.Protect "Contraseña"
End Sub

Sub desproteger()
ActiveSheet.Unprotect "Contraseña"
End Sub

cuando está abierto sin problemas, cuando esté cerrado el libro y se utilice después de las 21 horas que esté protegido.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.