Gestor de Inventarios Parte 12 | Ocultar Libro de Trabajo | VBA Excel 2013 #35

Описание: 35. Ocultar Libro de Trabajo excepto los formularios - Inventarios (UserForms) | VBA Excel 2013

Aquí ocultamos el Libro de Trabajo para que se ejecuten únicamente los formularios (UserForms). De esta manera tendremos una mayor seguridad, ya que el libro de trabajo no estará a la vista.

DESCARGA: https://goo.gl/uUFFfK
Este paquete contiene dos archivos
1. para 32 bits
2. para 64 bits
¿Por qué?
Por el hecho de que en el de 32 bits está el UserForm del calendario y en el de 64 bits lo he quitado
ya que es incompatible con Excel de 64 bits.

Para acceder al Gestor de Inventarios.
Administrador: otto pass: hola22
Empleado: usuario1 pass: amigos33

¿CÓMO ELIMINAR EL SPLASH SCREEN DE EXCE?
Para que no aparezca el splash de EXCEL, debemos crear un acceso directo, el cual he puesto en este paquete, únicamnte
editen la ruta donde van a colocar el archivo y ejecuten la aplicación a través de ese acceso, y de esa manera no
cargará el SPLASH DE EXCEL. De lo contrario, estarán viendo ambos SPLASH al cargar el libro de trabajo del Gestor de
Inventarios.

¿COMO FUNCIONAN LOS BOTONES GUARDAR Y SALIR?

Los botones de GUARDAR y SALIR, están creados meniante 4 cajas de imágen, las cuales están sobrepuestas, es decir
que el boton guardar, tiene la imágen verde bajo la imágen gris.
He utilizado el evento MOUSEMOVE, para que al momento de pasar el puntero sobre la imagen gris, ésta desaparezca y
muestre únicamente la imágen verde, la cual contiene el código de programación para realizar la rutina de guardado.
de esta manera está estructurado el código:

ESTO HACE DESAPARECER EL BOTON GUARDAR DE COLOR GRIS, CUANDO PASO EL PUNTERO SOBRE EL
Private Sub img_Guardar2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Me.img_Guardar2.Visible = False
End Sub

CUANDO EL BOTON GUARDAR DE COLOR VERDE ESTA VISIBLE, EJECUTA EL SIGUIENTE CÓDIGO
Private Sub img_Guardar1_Click()
ThisWorkbook.Save
End Sub


En el forumulario he puesto un EVENTO MOUSEMOVE, para que cuando muevo el puntero desde un botón a otro, se deshabiliten,
causando el efecto que vemos.

De la misma forma trabaja el botón SALIR.
-----------------------------------------------------------------------------------
¡Suscríbete!    / ottojaviergonzalez