Actividad pública reciente
Ha valorado "Excelente" la respuesta
Macro copiar celda determinada de diferentes hojas en una hoja Resumen
[Hola Te paso la macro Sub copiar() 'Por Adriel Ortiz Set h1 = Sheets("Resumen") ' For Each h In Sheets If h.Name <> h1.Name Then u = h1.Range("B" & Rows.Count).End(xlUp).Row + 1 h.Range("W1:X1").Copy h1.Range("B" & u) End If Next ' MsgBox "Fin" End...