Рет қаралды 174,490
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: 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...
★ Guardar facturas en PDF: • Microsoft Excel | Botó...
★ Gestión de inventario automático: • Gestion de inventario ...
★ Descontar de inventario al guardar factura: • Descontar del inventar...
Aprende inglés fácil, conmigo: / @pacho8a_
#Pacho8aExcel #ExcelFácil #Excel