Protegiendo el acceso al archivo: este caso es casi seguro que lo conoces, es simplemente, al
momento de guardarlo establecerle una contraseña de acceso...
Archivo | Guardar Como...
Del menú Herramientas seleccionas Opciones Generales
Le estableces la contraseña de protección
Le asignas nombre y guardas
Esta contraseña, en "general" es suficiente, para un usuario medio será practicamente imposible
abrirlo...
**************************
Protegiendo el acceso al código: si lo que quieres proteger es el código de tus macros, sigue
estos pasos...
Abre tu archivo
Entra al Editor de VBA Alt+F11
Ve al menú Herramientas | Propiedades de VBAProyect
Ve a la ficha Proteccion
Activas la casilla de verificación Bloquear proyecto para visualización
Estableces una contraseña (ya sabes, una que no se te olvide)
Ahora al abrir el archivo, aunque el usuario deshabilite las macros, no podra ver tu código...
**************************
o tambien:
Ejecuta las siguientes macros
Esta macro la tienes que ejecutar en todos los PC de tu trabajo donde quieras que se pueda usar el archivo
Private Sub Autorizar()
SaveSetting "MiArchivo", "Util", "Autorizado", "si"
End Sub
Esta es para cuando ya no este autorizado
Private Sub QuitarAutorizacion() DeleteSetting "MiArchivo", "Util", "Autorizado"
End Sub
Ahora, dentro del evento Open de cada libro que quieras proteger, buscara esta clave y si no la encuentra no dejara abrirlo...
Option Explicit
Private Sub Workbook_Open()
Dim Paso As String
Paso = LCase(GetSetting("MiArchivo", "Util", "Autorizado"))
If Paso = "si" Then
MsgBox "BIENVENIDO"
Else
MsgBox "NO ESTAS AUTORIZADO A USAR ESTE LIBRO"
ThisWorkbook.Close False
End If
End Sub
Claro, puedes poner algo mas dificil que un "si"
sacado de todoexpertos.....
http://www.todoexpertos.com/categorias/tecnologia-e-internet/software-y-aplicaciones/microsoft-excel/respuestas/137511/control-de-pc-para-abrir-archivos-excel