Dante Amor respondió:
H o l a : Te anexo la macro. Sub IngresoStock() 'Act.Por.Dante Amor ' INGRESO Macro ' Application.ScreenUpdating = False Set h1 = Sheets("Pedido") Set h2 = Sheets("Stock") ' u = h2.Range("B" & Rows.Count).End(xlUp).Row + 1 h1.Range("Tabla2[NUMERO DE...