Bloquear uso de archivo excel si corresponde al autor
Espero me puedan orientar o aclarar si es posible lo siguiente. Elabore algunos archivos excel con macros (se protegió la macro con contraseña), he incluí una fecha de vigencia para que dejase de ejecutar la macro, esto con la finalidad de establecer un periodo de uso para dichos archivos, ya que se pretendía el cobro por el uso de cada archivo por tiempo determinado. Estos archivos básicamente ejecutan mediante las macros procesos administrativos que están pensados en base a las necesidades de un individuo o empresa. De alguna manera lograron seguir usando los archivos y se adueñaron de ellos.? Es posible que pueda bloquear estos archivos tomando como referencia el autor, ¿la macro o la contraseña fecha de creación o algo con lo que demuestro que es mío? .
I. Hola Compañer@, por mí parte no soy conocedor sólo lector, pero creo que tal vez esta herramienta propietaria de Windows podría serle de alguna utilidad.
A su vez deseaba trasladarle la información que vi sobre este tema por si pudiese serle de alguna utilidad mientras le atiende un experto de primera mano, le ruego me disculpe las molestias de lectura e imprecisión, mucho ánimo.
¿Cómo conservar hoja protegida después de ejecutar una macro?.
https://stackoverflow.com/questions/6760981/lock-down-microsoft-excel-macro.
http://trucosycursos.es/proteger-una-macro-en-excel/.
https://www.redusers.com/noticias/trucos/excel-protege-el-codigo-de-las-macros/#:~:text=%E2%80%93%20Una%20vez%20dentro%20del%20editor,de%20protecci%C3%B3n%20en%20%5BContrase%C3%B1a%5D..
https://www.exceleinfo.com/protege-tu-codigo-vba-en-excel-con-vbacompiler/.
1 respuesta más de otro experto
Si tu libro tenía una macro para controlar la fecha vigente, y a pesar de estar vencida pueden continuar utilizándolo, puede deberse a 2 situaciones: O la macro de control de fechas falla ... o te han abierto el Editor y quitada esa restricción.
Por lo tanto, si el Editor fue abierto seguramente ya no tiene tu contraseña y hasta quizás hayan hecho cambios en los códigos también.
Ahora, si tu intención es tratar de demostrar tu autoría, se me ocurren 2 opciones:
1- Desde cualquier libro, colocar una macro para obtener la fecha de creación del libro usurpado, sin necesidad de abrirlo pero siempre que conozcas su ubicación.
Sub obtengoFechaCreacion()
'Ruta y nombre del libro usurpado
librox = "C:\Users\LENOVO\Downloads\" & "Libro.xlsm"
Set fc = CreateObject("Scripting.FileSystemObject")
'mostrar fecha de creación en un mensaje
MsgBox fc.GetFile(librox).DateCreated
End Sub2- Si puedes abrir el libro usurpado, podrías obtener el autor, con este código que colocarás en otro libro (considerando que ya no te permitirán ingresar al Editor con tu contraseña)
Sub obtengoAutoria() 'ruta y nombre del libro usurpado librox = "C:\Users\LENOVO\Downloads\" & "Libro.xlsm" Workbooks.Open (librox) MsgBox ActiveWorkbook.Author End Sub
Por último, también podrías tener copia de las macros y que se comparen con las tuyas. Aunque hayan retocado algunas instrucciones lo fuerte seguramente será igual a lo tuyo.
* Te recomiendo el video N° 65 de mi canal: Protección de hojas.