janoguerra

jferg respondió: Algo así: For Fila=Inicio to Fin Concatendo=worksheets("Entrada").cells(Fila,"A") & "," & worksheets("Entrada").cells(Fila,"C") worksheets("Salida").cells(Fila,"A")=Concatenado Next Fila

pollux_troy respondió: Se entiende perfectamente, excepto si necesitas que la macro te cree la nueva hoja cada vez que se ejecute o solo en una hoja nueva e ir reemplazando los datos cada vez que se ejecute...

parmijo respondió: Considerando que en todas las hojas los datos estan en la columna A prueba la siguiente macro Sub Bordes_hojas() Dim n As Integer, msj As String For n = 1 To Worksheets.Count nhoja = Worksheets(n).Name ult =...