Published On Sep 14, 2017
El día de hoy quiero mostrarte como puedes hacer un archivo para que genere las etiquetas de tus productos de forma automática y controlar mejor el inventario de tu negocio.
En este archivo utilizaremos la función BUSCARV o CONSULTAV para generar una alternativa de etiquetas automáticas y también utilizaremos una macro como segunda alternativa.
Te dejaré el link del archivo para que puedas practicarlo: https://bit.ly/3drLZXk
LA SEGUNDA ALTERNATIVA TE CREA LAS ETIQUETAS SEGÚN LA CANTIDAD DESEADA.
El código de la macro para el ejercicio es el siguiente:
*********************************************************************
Sub Macro1()
Dim REPETIR As Integer
REPETIR = Range("d1")
Range("A2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
For Q = 1 To REPETIR
Range("A65000").End(xlUp).Offset(1, 0).Select
ActiveSheet.Paste
Next Q
Application.CutCopyMode = False
Range("A1").Select
REPETIR = Range("d1")
Range("B2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
For Q = 1 To REPETIR
Range("B65000").End(xlUp).Offset(1, 0).Select
ActiveSheet.Paste
Next Q
Application.CutCopyMode = False
Range("A1").Select
End Sub
*********************************************************************
No te pierdas estos videos recomendados:
★ Crear botón para imprimir facturas: • Microsoft Excel | Crea rápidamente un...
★ Guardar facturas en PDF: • Microsoft Excel | Botón para Guardar ...
★ Gestión de inventario automático: • Gestion de inventario automatico de e...
★ Descontar de inventario al guardar factura: • Descontar del inventario al guardar u...
Aprende inglés fácil, conmigo: / @pacho8a_
#Pacho8aExcel #ExcelFácil #Excel