Alvaro Silveira respondió:
Aquí te paso el código: Private Sub Workbook_Open() dia_hoy = Date hora_hoy = Time dia_limite = CDate("13/03/2008") hora_limite = TimeValue("23:59:59") If dia_hoy = dia_limite And hora_hoy = hora_limite Then ActiveWorkbook.Protect Structure:=True,...