juana torres

Tengo la siguiente macro Sub CopiaLista() Dim ShER As Worksheet Dim SHDestino3 As Worksheet Dim Fila As Integer Dim Coumna As Integer Set ShER = Worksheets("Hoja2") Set SHDestino3 = Worksheets("Hoja3") Fila = ShER.Cells(Rows.Count, 2).End(xlUp).Row...

Alguien me puede ayudar por favor De la Hoja2 de mi archivo necesito pasar los datos de las columnas B4, M4, L4, N4, O4 (Pueden variar la cantidad de los datos) y se copien a la Hoja1 y si quiero copiar más datos a la hoja 1 se vayan pegando de bajo...