Como Copiar y pegar datos filtrados
Tengo una columna que tiene un filtro lo que necesito es copiar y pegar los datos incluyendo los filtrados es decir: en A1 esta el título que es clientes y en A2 hasta A 100 están los nombres de dichos clientes suponiendo que filtre la columna por un cliente determinado necesito copiar y pegar en otra hoja de A2 a A 100
Respuesta de James Bond
1
Prueba esta macro
Sub copiar()
Sheets("hoja1").Range("a1").AutoFilter
filas = Sheets("hoja1").Range("a1").CurrentRegion.Rows.Count
Sheets("hoja1"). Range("a2"). Resize(filas - 1). Copy
Sheets("hoja2"). Range("a2"). PasteSpecial
End Sub
