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!!

Formulario de Pagos en Excel

En esta ocasión aprenderemos como elaborar un formulario de pagos programandolo en Visual Basic.

*Como primer paso deberemos crear los encabezados en excel acerca de los datos que desearemos obtener, de nuestro formulario.

Luego pulsaremos ALT + F11 para ir hacia el editor de Visual Basic, luego haremos click en insertar, USEFORM.

Luego aumentaremos, el tamaño e insertaremos 5 etiquetas mas la del nombre que deberá ser la primera.

Luego insertaremos la sexta etiqueta en la cual ira la bonificación. Después de esto crearemos los cuadros de texto, en los cuales se escribirán los datos.

Luego crearemos un botón el cual programaremos después, y le asignaremos un nombre.

Luego le podremos una imagen de fondo a nuestro cuadro.

Haremos doble click encima de nuestro botón para comenzar a programar.

Comenzaremos a escribir nuestra fórmula la cual funcionará asi: [A2] = TextBox1   [A2] sera la celda a2 en la cual nosotros colocaremos el Numero, TextBox1 sera el cuadro en el cual ingresaremos los datos del Número. Y así sucesivamente.

Luego comenzaremos a calcular los valores de las demás celdas, como por ejemplo: [E2] = Val([C2]) + ([D2])     Sera: el valor de la celda E2 en donde ira el total del sueldo sera igual al valor del sueldo + la bonificacion.

Luego de que se hayan calculado los valores deberemos generar una nueva fila para que los valores se vayan guardando.

Por último deberemos limpiar nuestros cuadros en donde ingresaremos los datos para poder volver a escribir nuevos.

y así quedará terminado nuestro formulario de pagos. Solamente si queremos componer la apariencia de nuestro formulario deberemos regresar haciendo doble click en useform, pulsando en donde pusimos las etiquetas, y haciendo click en back style 0.

Y ASI QUEDARÁ NUESTRO FORMULARIO

Formularios en Excel

Microsoft funciona con varios tipos de informes. Puede utilizar los formularios que se proporcionan con excel para escribir datos de rangos, listas o en otras bases de datos. Se pueden diseñar formularios para imprimirlos o utilizarlos en pantalla así como para abrirlos en excel o incluirlos en páginas web. Para capturar y organizar los datos de los formularios en pantalla, se puede utilizar los libros en excel u otros programas con base de datos.

Macro escrita

En esta ocasión aprenderemos como trabajar con una macro pero a través de una macro escrita, plantearemos un ejercicio en el cual se usen el No. Nombre, Sueldo, Bono, Sueldo Total de 5 trabajadores. 




"UN DATO IMPORTANTE SERÁ QUE USAREMOS "RANGE" PARA REFERIRNOS A LAS CELDAS SEGUIDO DE (" "). SELECT, ENTRE COMILLAS SE ESCRIBIRA LA CELDA QUE SE QUIERE MENCIONAR COMO EJEMPLO: A1 SERIA Range ("A1"). Select


Para asignar un valor o escribir dentro de una celda se usará ActiveCell.FormulaR1C1 = "(aqui ira el valor o la escritura que desean ingresar)"


*Primero: Deberemos entrar al editor de Visual Basic, y eso lo haremos pulsando "Alt + F11" y asi entraremos al siguiente panel.

Luego de haber entrado haremos doble click en Hoja 1. (Para ingresar a nuestra área de trabajo)

Luego de haber ingresado a nuestra área de trabajo, escribiremos Sub y le asignaremos un nombre a nuestra macro abriremos y cerraremos paréntesis ( ) y automáticamente después de pulsar enter aparecerá End sub.

*Segundo: Comenzaremos a escribir nuestra fórmula, tomando en cuenta darle el formato que deseamos a nuestra macro.

"COMO DATO IMPORTANTE SI NO SABEMOS COMO ES EL CÓDIGO PARA DARLE UN FORMATO A UNA CELDA O A ALGUNA OTRA COSA SOLAMENTE ABRIREMOS UN NUEVO DOCUMENTO DE EXCEL.

Programaremos nuestra macro:

Haremos click en aceptar y se comenzará a grabar nuestra macro.

Luego pulsaremos Alt + F11.

Copiaremos el código que nos interesa, regresaremos a la otra hoja en la cuál estabamos programando nuestra macro y lo pegaremos.

Luego podremos seguir escribiendo nuestra macro, comenzaremos a llenar nuestras celdas con datos, utilizando la formula range y ActiveCell.FormulaR1C1 .

Luego aplicaremos negrita a alguna celda determinada utilizando la formula Range("  ").Select

Selection.Font.Bold = True  

Luego seguiremos llenando la segunda columna en la cual ingresaremos 5 nombres de distintos empleados.

le aplicaremos negrita y continuaremos con la escritura de la siguiente columna en la cual irán los sueldos de cada trabajador.

Luego escribiremos los datos de la siguiente columna que serán los bonos que recibe cada trabajador y de una vez le aplicaremos negrita a la celda de Bonos.

Luego escribiremos el encabezado de la siguiente columna los cuales serán la suma de los bonos mas el sueldo.

Y también asignaremos un borde (todos los bordes) a nuestra área de trabajo. 

Luego llenaremos la celda del Sueldo Total aplicando una pequeña suma, con la siguiente fórmula: 

Range("  ").Select

    ActiveCell.FormulaR1C1 = "=RC[-2]+RC[-1]"

Luego para comprobar cualquier error haremos click aquí:

Luego podremos regresar a nuestra hoja de excel para verificar como quedo nuestro trabajo.