Crear código QR con Excel VBA

Hola mundo! Hoy veremos cómo Crear código QR con Excel VBA, posteriormente haré una publicación similar con VBA y PHP

Vale, haremos esta aplicación en 5 sencillos pasos, los cuales listo a continuación

Descargar ‘Crear código QR con Excel.xlsm’ (contraseña: tutorialesexcel.com)

Paso #1: Diseño de la interfaz visual

Y casi siempre inicio con el mismo paso, el diseño es muy importante porque es la interfaz con la interactúa nuestro usuario final

Crear código QR con Excel

El usuario final ingresará el texto de los códigos a generar en la columna A, empezando en la fila 4

He creado 3 botones los cuales son:

  • Generar: Genera los códigos QR en la columna B
  • Limpiar imágenes: Elimina todas las imágenes de la hoja activa
  • Limpiar todo: Elimina todas las imágenes de la hoja activa y el texto ingresado en la columna A

Paso #2: Generar el código QR de manera individual

Para poder generar el código QR usaremos la API de Google, y para descargarlo usaremos la API URLDownloadToFile

La variable String Link almacenará la ruta a conectar, y la variable String Ruta la ubicación en donde se guardará

Y con esto ya hemos generado el código QR, ahora debemos insertarlo en nuestra plantilla

Paso #3: Insertar la imagen QR en la columna B

Vamos a interactuar con la imagen insertada realizando estas acciones:

  • Insertar la imagen
  • Dimensionar la imagen
  • Ubicar la imagen en la celda correspondiente

Por ello crearé una variable de tipo Object y extraeré los valores Top, Width y Left del rango con el que trabajo

Adicional usaré a Kill para eliminar el archivo descargado

Paso #4: Generar la macro de limpieza

Es necesario tener una macro de limpieza, para eliminar las imágenes generadas en una corrida anterior y opcionalmente el texto

Para poder eliminar las imágenes de la hoja activa, usaremos el siguiente código

La variable imagen de tipo Picture recorrerá las imágenes presentes en la hoja activa y las borrará

Luego restauraré el valor por defecto del alto de fila, desde la 4 hasta la última, ésta ‘restauración’ se realiza porque el código del paso 3 modifica el tamaño de fila

Utilizando éste código, crearé el código de limpieza de texto

Paso #5: Crear códigos QR masivamente

Ahora creamos nuestra macro de generación masiva de códigos QR, éste código es súper sencillo

generar código QR desde VBA

Y listo ya hemos terminado espero te haya gustado, recuerda que puedes descargar todos los archivos de mi blog completamente gratis desde tutorialesexcel.com/archivos/

Descargar ‘Crear código QR con Excel.xlsm’ (contraseña: tutorialesexcel.com)

Dejar un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *