Respuesta
en
Microsoft Excel
a
Macro para crear una hoja nueva en Excel con nombre y además copiar datos de una hoja preexistente
Sub AddC() Worksheets.Add(After:=Worksheets(Worksheets.Count)).Name = "Hojax" Set Celda = Worksheets("Tabla pedido").Range("k3") Set Hoja = Worksheets("Hojax") Set Rango = Worksheets("Tabla pedido").Range("c6:h200") Rango.Copy Sheets("Hojax").Select...