Fecha de expiración en archivos Excel
-->
Fecha de expiración en archivos Excel: Que te parece la idea de colocarle una fecha de expiración a tus archivos Excel de tal forma que llegada dicha fecha se autoelimine sin dejar rastro alguno en tu computadora. Se podría decir que la razón principal de usar esta macro es darle seguridad a tu información, en ciertas situaciones hay que ser un poco celoso de lo que tenemos y de alguna forma medir o graduar lo que compartimos (Información contenida en archivos excel).
Tambien el uso que le podriamos dar es para hacer versiones de prueba (Demos) de algún archivo, por ejemplo «Yo elaboré una plantilla en excel y quiero que la prueben por 15 días pasado ese tiempo que se autoelimine».
Supongo que recuerdan esta frase «este mensaje se autodestruirá» de unos dibujos animados, pues la finalidad de esta publicación es hacer lo mismo aplicado en Excel.
En la net hay varias macros que hacen esto, yo me he basado en la publicada en el foro de Excel de Emagister (2009).
Para aquellos usuarios avanzados dejo el código de la macro utilizada para que puedan implementarlo en sus proyectos, también lineas mas abajo está el enlace con la descarga de esta interesante macro.
esta macro esta interesante seria bueno poder quitarle el mensaje de eliminación y que se elimine en la fecha exacta que yo desee en cualquier libro que yo este trabajando, dejando una copia sin eliminar para mi y compartir la que lleve la macro, hay ciertas personas que no merecen mas de una hora con el libro, dicen que lo hicieron ellos y me han robado mi puesto de trabajo.
interesante Jaime lo que me comentas, vamos aver que se puede hacer, es cierto a veces la gente es mala y se toma atribuciones que no deben.
Quiero realizar la misma observación que Diego la Macro funciona muy bien el problema es que si tengo un archivo con un ejemple 3 hojas mientras cierre el programa en la hoja donde coloque la macro abre y funciona pero si cierro el programa en otra hoja del mismo archivo de excel me dice que ha caducado.
Como puedo realizar el cambio para que la macro la ejecute no importando en que hoja este mientras sea obvio el mismo archivo ??????
Modifica aquí: fecha = Range(«f6»).Value puedes colocarle así sheets(«nombredelahoja»).range(«f6»).value
Mi estimado Gustavo ya cambie la linea y ahora me aparece un error de tiempo de ejecución, hay algo que pueda hacer ?
que colocaste?.
Gustavo ya lo solucione, modifique un poco tu formula, supongo le falto el select, de esta manera me manda siempre a la hoja donde se ejecuta la macro, en verdad muchas muchas gracias por la aportación.
Para quienes descarguen el archivo y deseen ver la macro. Al abrir el archivo notarán que tiene fecha del 2013 por lo cual se elimina de inmediato. La solución sencilla para quien desee ver la macro es que cambien la fecha de su PC al año 2012 para que se extienda la fecha de caducidad.
Muy interesante macro, en lo personal prefiero que no avise que se va a eliminar ya que cualquier otro usuario que tenga algo de conocimiento podría eliminar la macro o hacer una copia de excel sin macros con lo cual no tendríamos el resultado deseado. Gracias por tan buen aporte, muy util!
Que tal, di con esta pagina por suerte, me ha parecido muy interesante las aportaciones que tienes, quise bajar este archivo, pero al correrlo, tiene fecha muy atrasada y no me permite verlo, hace lo que dices, LO ELIMINA, pero no me permite pasar de la primer hoja
me puedes dar otro ejemplo?,
Salu2
Quisiera Observar algo amigo….mire la verdad es muy interesante este macro, pero lo estuve checando y veo que solo funciona para una sola hoja, por ejemplo si el archivo lo dejo guardado en otra hoja….al momento de abrir nuevamente me dice que se ha caducado…………
Hola, un favor me podrias decir si existe algun programa o macro para quitar fecha de expiración a algún archivo de excel. Tengo un archivo que al abri dice que expire el fin de mes . Gracias,
COMO PROGRAMA ESTA MACRO DE AUTODESTRUCCION EN MIS ARCHOS EXCEL ACTUALES ?