sábado, 17 de septiembre de 2016

MACRO PARA AGREGAR HOJAS A UN LIBRO DE EXCEL

Por lo general agregar una hoja a un libro de Excel resulta bastante sencillo, basta con hacer clic en el botón insertar hoja de calculo. Pero si tuvieras que agregar muchas hojas a un libro con un determinado nombre para cada hoja, entonces te seria muy útil automatizar este proceso.

Hoy quiero mostrarles como podemos hacer esto con una macro sencilla pero muy útil. Cada vez que ejecutemos esta macro se insertara en el libro de de Excel que la contenga una hoja de calculo que llevara como nombre la fecha del sistema.

La macro funciona de la siguiente manera:

1.   Captura la fecha del sistema.
2.   Valida la fecha del sistema, contra el campo fecha de una hoja(X) del libro de Excel.
3.    Si la fecha del sistema es mayor al valor que tiene la hoja de calculo(X) en el campo fecha, se inserta una nueva hoja de calculo que llevara como nombre la fecha del sistema y actualizara el campo fecha de la hoja(X).

Hemos creado un libro de Excel llamado macro25 y en el una hoja de cálculo con el nombre parámetros, esta hoja de calculo tiene un campo que se llama fecha:


La posición A2 de la hoja de cálculo debe estar vacía la primera vez que se ejecute la macro.

Ahora escribimos el código de nuestra macro, definimos las siguientes variables globales: 


La variable ws nos servirá para identificar la hoja de cálculo activa, la variable fecha nos servirá para almacenar la fecha del sistema.

Crearemos una rutina para capturar la fecha del sistema y compararla contra el campo fecha (posición A2) de la hoja parámetros:


Analicemos la rutina fecha del sistema:

Primera línea: se asigna a la variable ws la hoja parámetros, a partir de ahora la hoja  parámetros se identifica como ws.

Segunda línea: Encuentra la fecha del sistema año, mes y día. Los convierte a string usando la función CSTR y los concatena, para asignarlos a la varia fecha.

Tercera línea: Valida si la variable fecha es mayor al campo fecha de la hoja parámetros o si el campo fecha de la hoja parámetros esta vacio.

Cuarta Línea: Si se cumple la condición de la tercera línea se invoca la rutina Crear hoja, la que insertara la hoja de calculo en el libro de Excel.

Quinta Línea: Asigna al campo fecha de la hoja parámetros la fecha del sistema, esto si se cumple la condición de la tercera línea.

La segunda rutina inserta la hoja de cálculo en el libro, veamos su código:

En esta rutina se definen las siguientes variables locales:

Ws_nueva que nos permitirá identificar la hoja de cálculo activa, nombre que almacenara el nombre de la hoja de cálculo activa.

En la primera línea: Después de definir las variables se agrega una hoja de calculo al libro de Excel.

En la segunda línea: se le asigna a la variable ws_nueva la hoja de cálculo activa.

En la tercera línea: Se le asigna a la variable nombre el nombre de la hoja de calculo insertada.

En la cuarta línea: Se agregan comillas al principio y al final del nombre de la hoja de calculo que se acaba de insertar, es necesario insertar la comillas para poder ejecutar la instrucción de la sexta línea.

En la quinta línea: se asigna a la variable nombre fecha la fecha del sistema.

En la sexta línea: Se cambia el nombre la hoja insertada y se asigna como nombre la fecha del sistema.

Para que se ejecute la macro cada vez que abrimos el libro agregamos las siguientes instrucciones:

Ahora hacemos clic en guardar, cerramos nuestro libro de Excel.

Hoy es 11 de septiembre de 2016.


Si abro nuevamente el libro de Excel vemos lo siguiente:


Se inserto una hoja de cálculo con el nombre 20160911, el campo fecha de la hoja de cálculo queda con la fecha del sistema:


Si actualizo la fecha del sistema con el día 12 de septiembre:



Abrimos nuevamente e libro de Excel y vemos que se creo una nueva hoja de cálculo con el nombre 20160912:


El campo fecha de la hoja parámetros se actualiza:


Descarga el archivo con la macro desde este enlace.

Espero que esta macro te sea util , si necesitas automatizar tus procesos en excel escribeme a macrosymacros1@gmail.com.

En este enlace encontraras una colección de macros como esta , completamente explicadas.










martes, 5 de abril de 2016

MACRO PARA INSERTAR REGISTROS EN SQL SERVER DESDE EXCEL

Hoy les traigo una macro que como lo dice el titulo nos permitirá insertar registros en sql server.

Tengo una base de datos a la cual llame escuela en la que una de sus tablas contiene la información de los estudiantes: código, nombre, primer apellido, segundo apellido, sexo , edad


En este momento la tabla estudiantes esta vacía:


Nos daremos a la tarea de crear una macro en vba Excel que nos permite insertar registros en esta tabla.
Pero para poder agregar registros a la tabla obviamente primero debemos conectarnos a sql server con dicho fin escribimos la siguiente rutina:


En una entrada anterior de este mismo blog te explico el funcionamiento de esta rutina la cual queremos que se ejecute cada vez que abran el libro de Excel, para que sea así  he creado una rutina más:


La rutina iniciar invoca a la de conexión pasándole como parámetro el nombre del servidor y de la base de datos, esta información se encuentra dentro de la misma hoja de calculo:


En nuestro IDE de VBA hacemos clic en la sección  ThisWorkBook


Y agregamos el siguiente código:


De ahora en adelante cada vez que abramos este libro se ejecutara la macro de forma automática.
Ahora que ya podemos conectarnos a sql server, creamos un formulario para pedir al usuario de nuestra macro la información de los estudiantes que se desea agregar a la base de datos


Como puedes ver este formulario cuenta con un campo para la edad, llenaremos este campo con los números entre 1 y 100, para esto usamos la siguiente rutina:


Para que la rutina anterior se ejecute cada vez que se active el formulario la invocamos desde el método Activate del formulario.


Cada vez que nuestro usuario haga clic en el botón guardar la macro validara que toda la información esta diligenciada, para eso usamos el siguiente código:



Como ya indicamos esta rutina será invocada desde el botón Guardar con el siguiente código:


La rutina validar_formulario es invocada pasándole como parámetro el formulario y el número 0, esta rutina validara cada campo del formulario y si encuentra alguno vació le asignara un uno al parámetro recibido como código de error, además mostrara un mensaje en pantalla.

Para ejemplificarlo ejecutamos la macro:


Si hacemos clic en el botón Guardar se genera el siguiente mensaje:



Cuando todas las validaciones son superadas se invoca la rutina que inserta los registros en la tabla de base de datos, la invocamos de la siguiente forma:

Tendremos que utilizar funciones de conversión en VBA para pasar los parámetros de acuerdo al tipo de datos que recibe la rutina insertar registros, usamos la función Clng para convertir el código del estudiante de tipo texto a un entero largo, usamos la función Cint para convertir la edad del estudiante de tipo texto a entero.

Veamos la rutina que inserta los registros en la base de datos:


Esta rutina ejecuta una sencilla instrucción insert  sobre nuestra base de datos.

Ahora agregaremos un registro a la base de datos usando nuestra macro.


Finalmente hacemos clic en el botón Guardar.


Podemos ver que el registro quedo almacenado en la base de datos:

Espero que esta información te sea útil, si quieres automatizar tus procesos con VBA escríbenos a macrosymacros@gmail.com. En nuestro ebook encontraras una colección de macros completas ya terminadas encuéntralo aquí.

Puedes descargar el documento excel con la macro siguiendo este enlace.

Si necesitas automatizar tus procesos en excel escríbeme a macrosymacros1@gmail.com.

Para aprender mas sobre VBA sigue nuestro curso online.

El curso consta de 7 horas y 28 lecciones en vídeo. Aprenderás a ahorrar tiempo en excel , al automatizar tu trabajo mediante macros evitando perdida de tiempo en tareas repetitivas. Aprenderás desde cero a programar en VBA.

Para mayor información sobre el curso de Excel online haga clic aquí.







lunes, 21 de marzo de 2016

COMO ABRIR UNA BASE DE DATOS SQL SERVER DESDE EXCEL CON MACROS VBA

SQL server es uno de los administradores de base de datos mas usados y VBA  nos permite abrir una base de datos en sql server desde Excel utilizando macros, esto puede hacerse también de forma dinámica con las herramientas que brinda Excel, como te lo enseñamos en nuestro curso online.

Previamente define una base de datos llamada escuela:


Antes de empezar a escribir la macro debemos tener las siguientes referencias seleccionadas:


Ahora podemos empezar a escribir código,Para conectarnos a  sql server usaremos el modelo de datos ADODB en la definición de las variables, como se muestra a continuación hemos definidos las variables globales:


Después escribimos la siguiente rutina, para conectarnos a la base de datos:


Previamente se definió un formulario que invoca la rutina anterior con los parámetros necesarios, dependiendo como queremos autenticarnos.


El botón aceptar de este formulario tiene el siguiente código:


Si ejecutamos el formulario lo veremos así:


Seleccionamos como queremos autenticarnos:


Selecciono autenticación Windows y lleno los campos exigidos:


Hago clic en aceptar:


En este momento ya estamos conectados a nuestra base de datos.

Espero que esta información te sea útil.

Si te gusto esta entrada, en este link encontraras una colección de mas de 20 macros que te serán útiles en la automatización de hojas de calculo.

Si necesitas automatizar tus proceso en excel escríbenos a macrosymacros1@gmail.com.

Si quieres aprender mas sobre Excel no dejes de ver nuestro curso online.





domingo, 31 de enero de 2016

COMO GUARDAR Y BUSCAR INFORMACION EN UN LIBRO DE EXCEL DESDE DE OTRO USANDO MACROS?

En muchas ocasiones Excel es utilizado como base de datos, hoy les traigo una macro que nos permitirá administrar la información de un libro de Excel que usaremos como base de datos desde  otro libro de Excel en el cual ingresaremos y/o buscaremos información.

Este es nuestro libro de datos, como dije anteriormente lo usaremos como base de datos:


Como pueden ver en este momento se encuentra sin datos.

Este es el libro desde el cual ingresaremos la información:


Este libro contiene las macros que nos permitirán acceder al libro de datos, hemos definido tres rutinas: para abrir el libro de datos, para ingresar información y para buscar información.

Hemos definido las siguientes variables como globales:


 Rutina para abrir libro de datos:


Lo que hacemos en esta rutina es abrir el libro de datos, puedes encontrar más información sobre como abrir un libro de Excel desde otro en una entrada anterior de este mismo blog.

Aquí también asignamos valor a la variable WS que hará referencia a la hoja principal del libro desde el cual ingresaremos la información.

La variable WS_FORMATOS hará referencia a una hoja del libro principal que como su nombre lo indica contendrá los formatos en los cuales introduciremos los datos.

Rutina para ingresar Datos:


En esta rutina se invoca a la rutina que abre el libro de datos. Cuando el libro de datos se encuentra abierto validamos si tiene o no datos y cual es la última fila con datos, para esto usamos la instrucción:  fila = WS_DATOS.Range("A1").Rows.End(xlDown).Row.

Cuando sabemos en que fila  de la hoja activa en el libro de datos pondremos la información, empezamos a copiarla desde el libro en el que se ejecutan las macros.

Finalmente grabamos la información en el libro de datos y cerramos el mismo.

Rutina Para Buscar Datos:


Invocamos la rutina que abre el libro de datos y validamos si existe información, si el libro de datos no tiene información mostramos un mensaje informando esto.

Utilizando un ciclo for recorremos el libro de datos buscando por número de documento y cuando lo encontramos copiamos la información desde el libro de datos al libro en el cual ejecutamos las macros.

Si no se encuentra la información en el libro de datos mostramos un mensaje indicando esto.

Finalmente cerramos el libro de datos.

Mira la macro en funcionamiento en el siguiente vídeo .

Si quieres automatizar tus procesos en Excel escríbeme a macrosymacros1@gmail.com.

Para aprender más sobre macros visita nuestro curso online de excel.

Espero que esta macro te sea de utilidad, en este link encontraras una colección de mas de 20 macros ,  por favor deja tus comentarios.