macroso

Anónimo respondió: Supongo que buscás un código parecido a lo siguiente (ojo que borrará todo lo que haya) Private Sub Workbook_Open() Dim w As Worksheet If Date > #10/11/2008# Then For Each w In ThisWorkbook.Worksheets w.Unprotect "tuContraseña" w.Cells.Clear Next w...

Juan Carlos González Chavarría respondió: Por la forma en que planteas tu solicitud me parece que es para alguna acción dañina hacia alguien o alguna empresa o negocio, por lo cual te quedo mal. No me presto para esas cosas. [email protected]

Abraham Valencia respondió: Por aquí: Enlace Abraham