UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

Lehoi


Hola 

He encontrado verdaderas joyas en este foro, pero por más que me estrujo el cerebro y trato de solucionar el problema no lo consigo.

Tengo esta macro que me copia los datos (solo los visibles) que previamente he filtrado, a otra hoja.
Esta macro me borra todo el contenido de la hoja destino antes de volcar los datos, pero lo que quiero es no borrar los que ya he copiado previamente sino añadir nuevos datos filtrados a esa tabla.

Ya luego con otra macro borraría todos los datos si así lo necesito para hacer una nueva tabla resumen.

El código es este:
Código:
Sub CopiarDatosFiltrados()

    Dim rngList As Range, sRngAddress As String
      
    With Sheet1
        Set rngList = .Range("A1:H" & .Cells(Rows.Count, "A").End(xlUp).Row).SpecialCells(xlCellTypeVisible)
        Sheet2.Cells.ClearContents
        rngList.Copy Sheet2.Range("A1")
        sRngAddress = "Datos_Filtrados!" & .Range("A1").CurrentRegion.Address
    End With
    Set rngList = Nothing

End Sub


Adjunto la tabla para si alguien se embulla y lo quiere probar.

Un saludo afectuoso a todos y gracias
Archivos
Filtrado y copiado de datos.xlsm
No tienes los permisos para descargar los archivos.
(47 KB)

Igtelo


Que tal Felix.

Te voy a hacer "sufrir" un poquito, jeje (no te molestes, me caes bien)...

1.- Ya te había dicho que ejecutes la macro por pasos, te dí un enlace. Con ello te será claro que está haciendo la macro.
2.- Haz pruebas eliminando el ClearContents, esto es lo que hace borrar.
3.- En la ayuda de Excel VBA (también te dí enlace), busca como trabaja CurrentRegion y verás que tan apropiado es o no para lo que quieres.

No te preocupes, lo resolvemos, pero primero quiero que le busques y nos comentas, ya viste en lo de la fórmula matricial lo lograste...

Saludos
Ignacio Téllez

Igtelo


Otra vez...

Ya encarrerado el ratón, a volar el gato. Con la condición de que hagas lo que te mencioné en la otra respuesta, te dejo de otra forma:

Posiciónate en cualquier columna y celda de tu hoja en el rango A2:H50000, doble click botón izq. y listo ya están los datos en la hoja2.

Saludos
Ignacio Téllez
Archivos
Lehoi-Filtra y copia datos.zip
No tienes los permisos para descargar los archivos.
(46 KB)

Lehoi


Mi querido, incansable y paciente Igtelo (sobre todo paciente)  Wink

No sé de donde sacas el tiempo para ayudar tanto a los que entramos diariamente pidiendo ayuda, te mereces un monumento!

Yo intenté varias cosas, lo primero fue quitar el clear contents pero claro eso era lo fácil, lo bueno venía después jaja, bueno que probé varias cosas pero siempre me añadía los datos al principio de la tabla sobreescribiendome los anteriores, en fin, que me sentí derrotado tras varios intentos fallidos y ya tuve que recurrir a la experiencia de los expertos de este foro.

He aprendido mucho en estas semanas (partiendo de cero) pero tengo que reconocer que estoy más verde que un aguacate. Estoy viendo muchos de los aporte de los usuarios del foro y de los comentarios de las macros aprendo muchísimo, pero no tengo la "mentalidad del programador"  como le llamo yo, no he desarrollado esa manera de pensar todavía, pero espero que lo consiga algún día y vea las cosas más fáciles de como las veo ahora.

No soy de los que se apropian de los méritos ajenos y siento decirte que la fórmula no la resolví yo por más que lo intenté  Embarassed, fue un usuario llamado Aladin en mrexcel que es un trozo de pan y como tú ayuda a mucha gente.
Ya con la fórmula hecha si entendí como funcionaba mas o menos (pero convendrás conmigo que no era de las fáciles)  No

Una cosa que estoy haciendo y que me ha ayudado a resolver cositas es grabar macros  y luego adaptar el código a mis necesidades, es una forma más que uso para aprender.

Bueno Igtelo, estudiaré lo del CurrentRegion que me aconsejaste, ya está anotado en la lista de cosas a estudiar (cada vez es mas larga jajajaja)

Y claro, que una vez mas con unas pocas líneas de código has resuelto un problema más, ojalá existiera la telepatía  Idea para conectarme con tu cabeza Wink

Un saludo y gracias por todo!

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.