Una pena tan pocos like's para un trabajo tan útil y tan completo, donde la información para tales trabajos no están al alcance de uno fácilmente... Un abrazo, y por más que tenga 4 años ya, sigue siendo muy útil! saludos!
Gracias por su generosidad y humildad. Usted afirma en su introducción no ser maestro ni tener estudios de ingeniería. No obstante, su desempeño es de un formidable maestro e ingeniero (sin importar si posee o no credenciales universitarias) con cualidades innatas para enseñar y conducir a los demás en la hermosa experiencia de construir conocimiento. Larga vida para usted. Desde Guadalajara, Jalisco, México.
ABEL BARON Gracias por tan amable comentario. Pero una pequeña aclaración. No soy maestro ni me dedico profesionalmente a la informática, pero sí tengo estudios universitarios en otra ingeniería. Un saludo amigo.
Muy buenas tardes, lo primero es poder felicitar su trabajo aqui en youtube, el cual es esplendido. Muchisimas gracias de mi parte y de otros muchos que igualmente no comentan.
Esta seguridad es la mejor que he visto en los demas metodos que he intentado , algunos metodos eran tan faciles de corromper simplemente con descargar un programa que leyera los archivos en Hexadecimal y le quitabas la clave y listo , esto que explicas es lo mejor de lo mejor , la verdad que si. Dejaba este comentario además de agradecerte por tal genialidad , por una consulta , deseo cambiarle la dirección a mi archivo "El que está oculto" obviamente al abrir el XLAM y cambiar el XLSM a otra dirección ya no necesitaría en el codigo dejarle el Thisworbook.Path , pero al acomodarlo como explicas cuando lo cambias a tu disco "E:" No me sale , dice que no se ha encontrado el archivo, además de que aunque coloco todo bien , si lo dejo en la misma carpeta de el XLAM con su Path , aún así no lo abre :(
me he unido a su foro Gracias por la ayuda descargue el evitar plagio 4 (super) y pude ver los errores que tenia en la configuración de mi hoja y lo arregle bueno le deseo muchos éxitos ya veo que muchas paginas se anuncian en su foro y eso es indicio de que le va muy bien Bendiciones y siga adelante, Excelente trabajo
Excelente amigo, mis felicitaciones por su admirable trabajo, que nuestro Padre Celestial, lo guarde y le colme de bendiciones. Gracias por compartir sus conocimientos.
hola, saludos a la distancia desde peru - puno, es un excelente trabajo que hizo, realmente necesitaba para proteger mis archivos de mis informes en excel, gracias por compartir este vídeo con nosotros
Te agradezco tu valiosa aportación. Aunque este comentario es muy tardío en este blog quiero compartir una idea para proteger nuestros trabajos en excel. Obviamente queremos proteger un trabajo que funciona con Macros que es lo que le da valor agregado. Pero si alguien ha podido romper la primera barrera de acceso para usarlo se puede incluir en las demás macros una verificación si se accedió al archivo mediante la macro de acceso (por ejemplo una clave de acceso en una celda registrado en una hoja oculta) u otra marca que dejé registrado la macro de acceso y si no pasa esa verificación que harían las demás macros de nuestro archivo entonces podría dentro de su mismos procesos detenerse o dejar de mostrar resultados en el funcionamiento esperado y con lo cual dejaría de tener nuestro archivo la funcionalidad esperada para ser usado. Con esto aun cuando se pueda acceder, el pirata no obtendrá el botín deseado. Saludos desde México. Un admirador de tu trabajo.
Amigo, me quito el sombrero tenia mucho rato buscando una solución para proteger el trabajo del desarrollador y evitar que los "listillos" se aprovechen indevidamente, gracias por su trabajo y su dedicación.
El mejor de los trabajos que he visto, ERES UN MAESTRO!!! Estuve viendo algunos videos y no se si puedas explicarme o hacer un video de lo que es ofuscación VBA, para proteger aun mas el plagio del codigo fuente, un fuerte abrazo!!! y millon gracias desde Ecuador.
La verdad es todo un experto, lo felicito por sus aporte, me han servido mucho, quisiera poder pedirle si me puede enviar una copia de este archivo para poder practicarlo mas y ver como trabaja, la verdad no soy experto en formulación de macros, nuevamente reciba un cordial saludo desde México.
Gracias por sus ayudas y por compartir sus conocimientos. Se podria hacer un codigo para colocar el numero del serial del equipo y solo se pueda utilizar el ARCHIVO en un solo equipo. NUEVAMENTE MUCHAS GRACIAS
Excelente video y felicitaciones por este material respecto a la protección excel. Tengo una consulta es posible que en lugar que se enrute a Workbooks.Open Filename:=ThisWorkbook.Path al archivo xlsm desde el directorio de la misma pc lo llame o enrute desde un hosting o servidor web?
Muy util. Quisiera saber unas macros para: 1. Evitar que le cambien la extension al archivo, solo si tiene la contraseña 2. Evitar copia con combinacion de tecla ctrl+c, ctrl+x, arrastrar con el mouse a otra carpeta o unidad, boton secundario del mouse y cortar o copiar. 3. que si sufre alguna alteracion en su codigo de escritura o programacion se autodestruya. saludos!
hola, muchas gracias por el tutorial. lo heimplementado y va muy bien pero el archivo que tengo no debe guardarse, hay alguna forma de ocupar el xlam sin guardar?. Espero tener la suerte de ser leida
Hola, saludos desde México me parece un excelente y muy completo trabajo, tengo una duda ¿no se desbloquean los password con el clásico sistema ZIP? Muchas gracias, Cordiales saludos
Excelente tutorial, pero encontré un pequeño detalle, si ejecutas este archivo que acabas de crear con el xlam, no se puede ejecutar en Office 2007, por favor revisalo y si lo solucionas te lo agradecería que me lo hicieras conocer, muchas gracias de antemano.
Buenas tardes, buen tutorial; sin embargo el archivo se puede copiar sin abrirlo, solo dándole al mouse botón derecho, copiar y pegar donde queramos. Podría protegerse el archivo de esta acción?
Buenas tardes, le escribo desde venezuela. Amigo muy bueno el material, sin embargo el archivo se puede plagiar usando las funciones copiar y pegar. Podría comentarme al respecto. Agradecido de antemano. Saludos
Excelente trabajo he realizado un registro de notas para escuelas y no quiero que me lo plagien y que a quien yo se lo pase no lo pueda compartir si existe una manera le agradeceria que me ayude
Buenas Noches Anaxandridas 100. Ante todo muchísimas gracias por tan valioso aporte para evitar el plagio de un archivo. Tengo un programa desarrollado en excel y me ha sido de mucha utilidad su sistema de seguridad. Pero tengo una inquietud, el libro se lo puede copiar y abrir con la contraseña desde otra máquina, lógicamente funcionará por el tiempo o número de veces que lo abran pero ya no tendría un único archivo y así se copiaría el libro hasta que se caduque la contraseña . Pregunta: ¿ existe alguna forma para que la contraseña sea única y no funcione en la copia ?. De antemano, agradezco su pronta respuesta.
+Diego A. Perez C. No. La única manera es hacer que se ejecute en una sola maquina, ya sea leyendo los n/s de los discos duros, o evitando que se cambie el nombre con path completo, mira aquí: ua-cam.com/video/dbqYCReypLU/v-deo.html&index=30&list=PLOD1MFxGA_qHN1jU8LPqMOJpAU6vD9Ejc cambiando un poco el código: Private Sub Workbook_Open() Application.EnableCancelKey = xlDisabled Application.DisplayAlerts = False On Error Resume Next If ThisWorkbook.FullName "[nombre con el path de tu directorio completo desde c:\ que incuye el nombre del PC]" Then MsgBox "ESTE LIBRO NO PUEDE COPIARSE" & Chr(10) _ & "SE BORRARA AUTOMATICAMENTE" LIBROMALO = ThisWorkbook.FullName Kill LIBROMALO ThisWorkbook.Close End If End Sub Puede que haga un tutorial sobre leer los discos duros.
gracias por tu aporte, quisiera saber si es posible hacer una clave para un archivo excel pero que funciones solamente en un determinado computador. no en cualquier otro. por decir solo en el mio no en ninguno otro. gracias
Hola , maravilloso trabajo, cuando comparto el libro para varios usuarios ,sale error al abrirlo "metodo Protect de objeto _Workbook', igual que al cerrar, alguna solucion ? o no se puede compartir para trabajar varios usuarios. Muchas gracias por su enriquecedora enseñanza,
Ggracias por la info, tengo problemas en Workbooks.Open Filename:="M:\EPO V2.1.xlsm", _Password:="anax", WriteResPassword:="andridas"cuenta = Sheets(5).Range("XFD1")Sheets(5).Visible = 2cuenta = cuenta + 1 Que es el "M", como lo uso, Otra duda, commo haria para que otras personas no puedan usar el guardar como desde el inicio hasta que caduque la licencia para asi evitar que reprosucas el proyecto por ayuda.
como veo esto no puedo mezclar mas de los tutoriales de seguridad me refiero a que el que pide habilitar macros no lo puedo mezclar con el que impide guardar como veo que uso otro tipo de hoja, esto debido a eu no puedo ingresar 2 veces BeforeSave en la misma this workbook
hola buenos días. Han sido muy útiles tus enseñanzas y ejemplos. A cuál dirección te puedo enviar mi archivo, que tiene problemas, se bloquea cuando intento actualizar hoja Sites_Data. gracias.
Maestro gran tutoría, 8 años después y aún sigue vigente. Pero… qué tal esta opción Digamos que mi compañero se sepa el acceso de la licencia, si está cuando tenga en acceso limitado vence. Solo colocáis el código nuevamente, pero qué tal si en lugar de colocar el anterior código le pida uno nuevo
Es decir digamos que la primera vez el código de la licencia sea “123” tomesmolo como ejemplo. Si está persona se sabe la clave podría ingresar X veces. Y si cuando la licencia venza, la contrata anterior ya no sea “123” si no “1234” De tal Menera de que cuando la licencia venza tenga nuevos códigos actualizados
Buen aporte Anax. Aunque estoy teniendo muchos problemas para poder visualizar el video. Se queda pensando y no se visualiza. Intenté descargarlo, con aTube, para verlo en cualquier momento y sin conexión a la red, pero tampoco me deja. Puede ser problema de servidor ó que el video pese mucho? Habría alguna alternativa para poder descargar el video Anax?Gracias y un saludo.
Hola Anaxandridas100, tus videos me han servido mucho para proteger un archivo que estoy desarrollando para el uso de varias personas. Sin embargo, me gustaría que al final cuando la licencia caduque el archivo .xlsm se elimine. He intentado varias macros pero no me funcionan porque el archivo está protegido contra escritura. Hay alguna forma de hacerlo? Agradezco tu pronta respuesta. Saludos!
+Alejandra Villada Al final del código de la macro bloqueo, sustituye las líneas que cierran el libro (ActiveWorkBook.Close) y quitan la aplicación (Application Quit) por esto: Application.EnableCancelKey = xlDisable On Error Resume Next Application.DisplayAlerts = False Me.ChangeFileAccess xlReadOnly Kill Me.FullName Me.Close False Este código aparece en los primeros vídeos del antiplagio (el libro heavy): ua-cam.com/play/PLOD1MFxGA_qHN1jU8LPqMOJpAU6vD9Ejc.html, vídeos 9 y 10
+Anaxandridas100 Gracias por tu pronta respuesta. Sin embargo, ese es el código que he puesto pero me sale un error en la parte Kill Me.FullName Me aparece esto: "Se ha producido el error 53 en tiempo de ejecución. Archivo no encontrado". Creo que esto se debe a las contraseñas de lectura y escritura que tiene el archivo .xlsm. Sabes alguna manera de que la macro bloqueo que se ejecuta en el archivo .xlam le quite las contraseña al archivo .xlsm y lo borre? Gracias de nuevo!
+Alejandra Villada Si la macro bloquea está en el xlam, no se puede poner Me, ya que esa palabra se refiere al mismo archivo, es decir trata de borrar el xlam y no el xlsm. debes cambiar las palabras Me por el nombre completo del xlsm. Algo como asignar una variable al nombre del libro ej.: libro= Thisworkbook.Path & "\[nombre del libro].xlsm", y luego Kill libro
+Anaxandridas100 muchas gracias por tu respuesta. Ademas de lo que mencionas, me di cuenta que el problema estaba en que el archivo xlsm esta oculto, por lo tanto, para poder borrarlo es necesario cambiarle los atributos. Lo hice así: SetAttr libro, vbNormal y luego Kill libro Saludos!
buen video podrias decirme como hacer para poner una clave de licencia para una hoja en especifica es decir que cada vez que quiera ver lo que esta en esa hoja me pida una licencia. espero tu respuesta
Una pena tan pocos like's para un trabajo tan útil y tan completo, donde la información para tales trabajos no están al alcance de uno fácilmente...
Un abrazo, y por más que tenga 4 años ya, sigue siendo muy útil! saludos!
Gracias por su generosidad y humildad. Usted afirma en su introducción no ser maestro ni tener estudios de ingeniería. No obstante, su desempeño es de un formidable maestro e ingeniero (sin importar si posee o no credenciales universitarias) con cualidades innatas para enseñar y conducir a los demás en la hermosa experiencia de construir conocimiento. Larga vida para usted. Desde Guadalajara, Jalisco, México.
ABEL BARON Gracias por tan amable comentario. Pero una pequeña aclaración. No soy maestro ni me dedico profesionalmente a la informática, pero sí tengo estudios universitarios en otra ingeniería.
Un saludo amigo.
Muy buenas tardes, lo primero es poder felicitar su trabajo aqui en youtube, el cual es esplendido.
Muchisimas gracias de mi parte y de otros muchos que igualmente no comentan.
oscar muñoz Gracias amigo.
Esta seguridad es la mejor que he visto en los demas metodos que he intentado , algunos metodos eran tan faciles de corromper simplemente con descargar un programa que leyera los archivos en Hexadecimal y le quitabas la clave y listo , esto que explicas es lo mejor de lo mejor , la verdad que si. Dejaba este comentario además de agradecerte por tal genialidad , por una consulta , deseo cambiarle la dirección a mi archivo "El que está oculto" obviamente al abrir el XLAM y cambiar el XLSM a otra dirección ya no necesitaría en el codigo dejarle el Thisworbook.Path , pero al acomodarlo como explicas cuando lo cambias a tu disco "E:" No me sale , dice que no se ha encontrado el archivo, además de que aunque coloco todo bien , si lo dejo en la misma carpeta de el XLAM con su Path , aún así no lo abre :(
me he unido a su foro Gracias por la ayuda descargue el evitar plagio 4 (super) y pude ver los errores que tenia en la configuración de mi hoja y lo arregle bueno le deseo muchos éxitos ya veo que muchas paginas se anuncian en su foro y eso es indicio de que le va muy bien Bendiciones y siga adelante, Excelente trabajo
Excelente amigo, mis felicitaciones por su admirable trabajo, que nuestro Padre Celestial, lo guarde y le colme de bendiciones. Gracias por compartir sus conocimientos.
hola, saludos a la distancia desde peru - puno, es un excelente trabajo que hizo, realmente necesitaba para proteger mis archivos de mis informes en excel, gracias por compartir este vídeo con nosotros
Excelente mi buen amigo bien explicado felicidades por tu programa un saludo desde Tijuana 🇲🇽 México
Te agradezco tu valiosa aportación. Aunque este comentario es muy tardío en este blog quiero compartir una idea para proteger nuestros trabajos en excel.
Obviamente queremos proteger un trabajo que funciona con Macros que es lo que le da valor agregado. Pero si alguien ha podido romper la primera barrera de acceso para usarlo se puede incluir en las demás macros una verificación si se accedió al archivo mediante la macro de acceso (por ejemplo una clave de acceso en una celda registrado en una hoja oculta) u otra marca que dejé registrado la macro de acceso y si no pasa esa verificación que harían las demás macros de nuestro archivo entonces podría dentro de su mismos procesos detenerse o dejar de mostrar resultados en el funcionamiento esperado y con lo cual dejaría de tener nuestro archivo la funcionalidad esperada para ser usado. Con esto aun cuando se pueda acceder, el pirata no obtendrá el botín deseado. Saludos desde México. Un admirador de tu trabajo.
De verdad muchísimas gracias por tu tiempo y dedicación. Dios te bendiga, pues piensas en tu prójimo. Saludos, desde Chiclayo Perú.
Ojala se pudiera aplaudir por acá..... Excelente video eres un Súper Sayayin Nivel Dios gracias por los aportes !!!!!
Amigo, me quito el sombrero tenia mucho rato buscando una solución para proteger el trabajo del desarrollador y evitar que los "listillos" se aprovechen indevidamente, gracias por su trabajo y su dedicación.
Fernando Mujica Gracias a tí por tu comentario
Gracias por tu tiempo y por compartir tan invaluables conocimientos, eres un ejemplo a seguir
Gracias por comentar. Un saludo
Excelente mil puntos, muy bien explicado y facil de entender... Felicitaciones
El mejor de los trabajos que he visto, ERES UN MAESTRO!!! Estuve viendo algunos videos y no se si puedas explicarme o hacer un video de lo que es ofuscación VBA, para proteger aun mas el plagio del codigo fuente, un fuerte abrazo!!! y millon gracias desde Ecuador.
no lo he probado lo voy a intentar haber si me sale pero el video que as echo me parece fabuloso muchisimas gracias por tus aportes
Wow! Esto es oro, necesito procesarlo. Gracias por compartirlo
muy buen trabajo y bien explicado, gracias por tu tiempo y aportar tus conocimientos, muy útil!!!
Exelénte tutoríal como siempre, muy útil y fácil de entender
Gracias
Como siempre y como todos tus tutoriales PERFECTO!!!!
Anaxandridas, me gustaron tus videos. son muy buenos. Los he usado y funcionan muy bien
Gracias por compartir tu trabajo, colega, es admirable tu contribución.
La verdad es todo un experto, lo felicito por sus aporte, me han servido mucho, quisiera poder pedirle si me puede enviar una copia de este archivo para poder practicarlo mas y ver como trabaja, la verdad no soy experto en formulación de macros, nuevamente reciba un cordial saludo desde México.
Fernando Salgado Todos los archivos están disponibles en mi página web. anaxandridas100.wix.com/anaxandridas
Gracias por sus ayudas y por compartir sus conocimientos.
Se podria hacer un codigo para colocar el numero del serial del equipo y solo se pueda utilizar el ARCHIVO en un solo equipo. NUEVAMENTE MUCHAS GRACIAS
Excelente trabajo, es usted todo un maestro.
Gracias amigo.
Eres un capo..... muy buen video, gracias por compartir =)
Excelente video y felicitaciones por este material respecto a la protección excel.
Tengo una consulta es posible que en lugar que se enrute a Workbooks.Open Filename:=ThisWorkbook.Path al archivo xlsm desde el directorio de la misma pc lo llame o enrute desde un hosting o servidor web?
Gracias por compartir tu conocimiento vale pa delante maestro
Ok. muchas gracias por su informacion , la voy a revisar .
Exitos y nuevamente gracias.
Muy util. Quisiera saber unas macros para:
1. Evitar que le cambien la extension al archivo, solo si tiene la contraseña
2. Evitar copia con combinacion de tecla ctrl+c, ctrl+x, arrastrar con el mouse a otra carpeta o unidad, boton secundario del mouse y cortar o copiar.
3. que si sufre alguna alteracion en su codigo de escritura o programacion se autodestruya.
saludos!
cristian mirgoniano muy buena apreciacion d igual m intrza los mismo... alexandrina muy buen trabajo y gracias x comprtirlo
hola, muchas gracias por el tutorial. lo heimplementado y va muy bien pero el archivo que tengo no debe guardarse, hay alguna forma de ocupar el xlam sin guardar?. Espero tener la suerte de ser leida
Hola, saludos desde México me parece un excelente y muy completo trabajo, tengo una duda ¿no se desbloquean los password con el clásico sistema ZIP? Muchas gracias, Cordiales saludos
Fantástico, gracias!!!!!!!!!
Excelente tutorial, pero encontré un pequeño detalle, si ejecutas este archivo que acabas de crear con el xlam, no se puede ejecutar en Office 2007, por favor revisalo y si lo solucionas te lo agradecería que me lo hicieras conocer, muchas gracias de antemano.
Muchas Gracias, Gran Aporte
Buenas tardes, buen tutorial; sin embargo el archivo se puede copiar sin abrirlo, solo dándole al mouse botón derecho, copiar y pegar donde queramos. Podría protegerse el archivo de esta acción?
Excelente!!!!
Eres un fenomeno.
Gracias.
Buenas tardes, le escribo desde venezuela. Amigo muy bueno el material, sin embargo el archivo se puede plagiar usando las funciones copiar y pegar. Podría comentarme al respecto. Agradecido de antemano. Saludos
Excelente, es de gran ayuda
Excelente trabajo he realizado un registro de notas para escuelas y no quiero que me lo plagien y que a quien yo se lo pase no lo pueda compartir si existe una manera le agradeceria que me ayude
Buenas Noches Anaxandridas 100.
Ante todo muchísimas gracias por tan valioso aporte para evitar el plagio de un archivo.
Tengo un programa desarrollado en excel y me ha sido de mucha utilidad su sistema de seguridad.
Pero tengo una inquietud, el libro se lo puede copiar y abrir con la contraseña desde otra máquina, lógicamente funcionará por el tiempo o número de veces que lo abran pero ya no tendría un único archivo y así se copiaría el libro hasta que se caduque la contraseña .
Pregunta: ¿ existe alguna forma para que la contraseña sea única y no funcione en la copia ?.
De antemano, agradezco su pronta respuesta.
+Diego A. Perez C. No. La única manera es hacer que se ejecute en una sola maquina, ya sea leyendo los n/s de los discos duros, o evitando que se cambie el nombre con path completo, mira aquí: ua-cam.com/video/dbqYCReypLU/v-deo.html&index=30&list=PLOD1MFxGA_qHN1jU8LPqMOJpAU6vD9Ejc
cambiando un poco el código:
Private Sub Workbook_Open()
Application.EnableCancelKey = xlDisabled
Application.DisplayAlerts = False
On Error Resume Next
If ThisWorkbook.FullName "[nombre con el path de tu directorio completo desde c:\ que incuye el nombre del PC]" Then
MsgBox "ESTE LIBRO NO PUEDE COPIARSE" & Chr(10) _
& "SE BORRARA AUTOMATICAMENTE"
LIBROMALO = ThisWorkbook.FullName
Kill LIBROMALO
ThisWorkbook.Close
End If
End Sub
Puede que haga un tutorial sobre leer los discos duros.
Muchas gracias por la información, espero tener un buen resultado porque he trabajado mucho en ese proyecto, nuevamente mil gracias por su tiempo.
gracias por tu aporte, quisiera saber si es posible hacer una clave para un archivo excel pero que funciones solamente en un determinado computador. no en cualquier otro. por decir solo en el mio no en ninguno otro. gracias
Muchas gracias !!! 😊😊
Hola , maravilloso trabajo, cuando comparto el libro para varios usuarios ,sale error al abrirlo "metodo Protect de objeto _Workbook', igual que al cerrar, alguna solucion ? o no se puede compartir para trabajar varios usuarios.
Muchas gracias por su enriquecedora enseñanza,
Buen tutorial, muy util, gracias por tu tiempo!
De nada, es un placer.
Buenismo. Muchas gracias.
excelente muy bueno como puedo ponerme en contacto contigo queria hacerte una consulta en privado si puede ser gracias
Ggracias por la info,
tengo problemas en
Workbooks.Open Filename:="M:\EPO V2.1.xlsm", _Password:="anax", WriteResPassword:="andridas"cuenta = Sheets(5).Range("XFD1")Sheets(5).Visible = 2cuenta = cuenta + 1
Que es el "M", como lo uso,
Otra duda, commo haria para que otras personas no puedan usar el guardar como desde el inicio hasta que caduque la licencia para asi evitar que reprosucas el proyecto por ayuda.
Pues M es la unidad de almacenamiento donde terminó el archivo, es la única linea con la que estoy teniendo problema, ya pudiste?
como veo esto no puedo mezclar mas de los tutoriales de seguridad me refiero a que el que pide habilitar macros no lo puedo mezclar con el que impide guardar como veo que uso otro tipo de hoja, esto debido a eu no puedo ingresar 2 veces BeforeSave en la misma this workbook
hola buenos días. Han sido muy útiles tus enseñanzas y ejemplos. A cuál dirección te puedo enviar mi archivo, que tiene problemas, se bloquea cuando intento actualizar hoja Sites_Data. gracias.
+Julio Quintero ¿La hoja Sites_Data?. ¿Qué hoja es esa?
Maestro gran tutoría, 8 años después y aún sigue vigente.
Pero… qué tal esta opción
Digamos que mi compañero se sepa el acceso de la licencia, si está cuando tenga en acceso limitado vence.
Solo colocáis el código nuevamente, pero qué tal si en lugar de colocar el anterior código le pida uno nuevo
Es decir digamos que la primera vez el código de la licencia sea “123” tomesmolo como ejemplo.
Si está persona se sabe la clave podría ingresar X veces.
Y si cuando la licencia venza, la contrata anterior ya no sea “123” si no “1234”
De tal Menera de que cuando la licencia venza tenga nuevos códigos actualizados
G R A C I A S !!!!
hola, esto se puede usar con una base de datos de access?
Buen aporte Anax. Aunque estoy teniendo muchos problemas para poder visualizar el video. Se queda pensando y no se visualiza. Intenté descargarlo, con aTube, para verlo en cualquier momento y sin conexión a la red, pero tampoco me deja. Puede ser problema de servidor ó que el video pese mucho? Habría alguna alternativa para poder descargar el video Anax?Gracias y un saludo.
+davidsagal Usa esta extensión de programa (para FireFox): UA-cam Video and Audio Downloader
Hola Anaxandridas100, tus videos me han servido mucho para proteger un archivo que estoy desarrollando para el uso de varias personas. Sin embargo, me gustaría que al final cuando la licencia caduque el archivo .xlsm se elimine. He intentado varias macros pero no me funcionan porque el archivo está protegido contra escritura. Hay alguna forma de hacerlo?
Agradezco tu pronta respuesta.
Saludos!
+Alejandra Villada Al final del código de la macro bloqueo, sustituye las líneas que cierran el libro (ActiveWorkBook.Close) y quitan la aplicación (Application Quit) por esto:
Application.EnableCancelKey = xlDisable
On Error Resume Next
Application.DisplayAlerts = False
Me.ChangeFileAccess xlReadOnly
Kill Me.FullName
Me.Close False
Este código aparece en los primeros vídeos del antiplagio (el libro heavy): ua-cam.com/play/PLOD1MFxGA_qHN1jU8LPqMOJpAU6vD9Ejc.html, vídeos 9 y 10
+Anaxandridas100 Gracias por tu pronta respuesta. Sin embargo, ese es el código que he puesto pero me sale un error en la parte Kill Me.FullName
Me aparece esto: "Se ha producido el error 53 en tiempo de ejecución. Archivo no encontrado". Creo que esto se debe a las contraseñas de lectura y escritura que tiene el archivo .xlsm. Sabes alguna manera de que la macro bloqueo que se ejecuta en el archivo .xlam le quite las contraseña al archivo .xlsm y lo borre?
Gracias de nuevo!
+Alejandra Villada Si la macro bloquea está en el xlam, no se puede poner Me, ya que esa palabra se refiere al mismo archivo, es decir trata de borrar el xlam y no el xlsm. debes cambiar las palabras Me por el nombre completo del xlsm. Algo como asignar una variable al nombre del libro ej.: libro= Thisworkbook.Path & "\[nombre del libro].xlsm", y luego Kill libro
+Anaxandridas100 muchas gracias por tu respuesta. Ademas de lo que mencionas, me di cuenta que el problema estaba en que el archivo xlsm esta oculto, por lo tanto, para poder borrarlo es necesario cambiarle los atributos. Lo hice así:
SetAttr libro, vbNormal y luego Kill libro
Saludos!
+Alejandra Villada Fenomenal.. Me encanta que la gente lo descubra por sí misma.
Buen trabajo.
Saludos
¡Suscrito! Gracias
+Jesús Pérez Estupendo gracias.
Me suscribo anaxandridas.
buen video podrias decirme como hacer para poner una clave de licencia para una hoja en especifica es decir que cada vez que quiera ver lo que esta en esa hoja me pida una licencia. espero tu respuesta
etanislao lujan Mira esto: ua-cam.com/video/cJKMb2xOQks/v-deo.html
***** gracias
Si se marca deshabilitar las macros sin notificaciòn no te pide la licencia de uso en el xlam. Al menos es lo que me pasa.
LO PUDE RENOMBRAR DESDE LA PC
Me gusta mucho su contenido es muy original. Felicitaciones Ideal para complementar con nuestro canal ua-cam.com/users/jfksoft