domingo, 26 de febrero de 2012

Formulario de Asistencia

En esta oportunidad aprenderemos a elaborar un programa para poder tomar datos de asistencia como código, nombre, grado, carrera, fecha, hora de entrada.


*PRIMERO: Deberemos generar lo que será nuestra base de datos, y le asignaremos una matriz a todos los datos en general.



Luego de eso iremos a la hoja numero dos a la cual le colocaremos como nombre listado de asistencia, y escribiremos los datos que queremos obtener.
Y escribiremos algunas fórmulas para encontrar los valores que necesitamos.








Ahora copiaremos y pegaremos los mismos encabezados solamente sin el código, dejando un espacio determinado.


Generaremos, un pequeño listado en la parte media, solo para poder controlar los datos que vamos poniendo.


ahora asignaremos algunas fórmulas pero primero combinaremos y centraremos algunas celdas.




DEBEREMOS ASIGNAR UN FORMATO DE FECHA A TODA LA COLUMNA F

Luego de haber hecho esto crearemos una macro...



luego copiaremos los valores de la fila A2, y crearemos un pegado especial



y haremos click donde dice valores


Luego de haber pegado insertaremos una nueva fila.. y pararemos de grabar nuestra macro...



Luego pulsaremos ALT + F11 para ir al editor de Visual Basic y ahi generaremos un Formulario..


Luego ingresaremos una nueva etiqueta para asignar el titulo a nuestro formulario...


Crearemos otra etiqueta en la cual dirá ingrese su código.


Le pondremos un fondo transparente.. a nuestra etiqueta


luego crearemos un cuadro de texto lo dibujaremos y luego haremos doble click sobre el para programarlo.



Condicionaremos de primero con la siguiente fórmula : If Val(TextBox1) >= 6000 Then
[G2] = TextBox1 en la cual dira que si la cifra que se ingrese es mayor o igual que 6000 entoncs proceda a copiarla en g2.



ahora copiaremos la macro que ya habíamos grabado antes colocándonos en módulos, luego en modulo 1.


luego de haberla copiado regresaremos al useform para pegarla, 




Por último solamente cerraremos limpiando nuestro cuadro de texto para poder volver a escribir.. TextBox1 = Empty con esto se limpiara el cuadro..
    TextBox1.SetFocus y con esto cerraremos...



POR ÚLTIMO SI DESEAMOS PONERLE UN FONDO A NUESTRO FORMULARIO PODEMOS REGRESAR A NUESTRO USEFORM... Y ASIGNARLE UNA IMAGEN DE FONDO.. Y TAMBIEN A LA ETIQUETA DE ASISTENCIA LE PODEMOS PONER EL FONDO TRANSPARENTE..



Y ASI QUEDARÁ NUESTRO FORMULARIO DE ASISTENCIA!!




No hay comentarios:

Publicar un comentario