Página 1 de 1

[RESUELTO] Copiar celdas visibles pegar valores en otra hoja

NotaPublicado: Sab Nov 17, 2018 8:28 pm
por physic
saludos

         Estoy buscando una macro para copiar las celdas que se filtrar en el filtro auto (celdas visibles) y pegar los valores en otra hoja de cálculo

         Descripción del problema :

         en la hoja de cálculo1 tiene Auto Filtro de columna A hasta la columna Z

         es necesario copiar las celdas filtradas visibles de la columna A hasta la columna E y pegar sólo los valores en la primera celda vacía de la columna A en la hoja de cálculo2

         volver a la hoja de cálculo1 y copiar las celdas filtradas visibles de la columna I hasta la columna L y pegar sólo los valores en la primera celda vacía de la columna F en la hoja de cálculo2

         volver a la hoja de cálculo1 y copiar las celdas filtradas visibles de la columna U hasta la columna W y pegar sólo los valores en la primera celda vacía de la columna J en la hoja de cálculo2

         luego volver a la hoja de cálculo1 y deshacer todos los filtros, es decir, Borrar todos los filtros


abrazos

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Dom Nov 18, 2018 2:09 am
por mauricio
Tu pregunta se ha respondido varias veces en estos foros... ¿ya realizaste una búsqueda?

Saludos

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Dom Nov 18, 2018 2:29 am
por physic
He encontrado algunos modelos, pero desafortunadamente no he podido adaptar correctamente a mi problema propuesto

También encontré otro enlace de soporte:

http://document-foundation-mail-archive ... 64486.html

pero tampoco he podido adaptar a mi problema



abrazos

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Lun Nov 19, 2018 11:42 am
por physic
Amigos, si me pueden ayudar en la construcción de este código, estoy agradecido desde ahora


abrazos

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Lun Nov 19, 2018 6:07 pm
por mauricio
Por favor, con una vez que hagas tu solicitud es suficiente, toma en cuenta que aquí todos somos voluntarios ayudando a otros usuarios, debes de es esperar a que alguien sepa la respuesta y desee ayudarte.

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Mié Nov 21, 2018 4:42 am
por physic
He encontrado un código VBA que hace en Excel lo que necesito

Si me pueden ayudar a convertir a LibreOffice (BASIC), desde ya estoy agradecido

fuente: https://forum.baboo.com.br/index.php?/t ... filtradas/


código VBA

Sub CopyFilter()

Dim rng As Range
Dim rng2 As Range

With ActiveSheet.AutoFilter.Range
On Error Resume Next
Set rng2 = .Offset(1, 0).Resize(.Rows.Count - 1, 1) _
.SpecialCells(xlCellTypeVisible)
On Error GoTo 0
End With
If rng2 Is Nothing Then
MsgBox "No data to copy"
Else
Worksheets("Plan2").Cells.Clear
Set rng = ActiveSheet.AutoFilter.Range
rng.Offset(1, 0).Resize(rng.Rows.Count - 1).Copy _
Destination:=Worksheets("Plan2").Range("A1")
End If

ActiveSheet.ShowAllData

End Sub

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Mié Nov 21, 2018 11:58 pm
por mriosv
Existe una extensión para LibreOffice que lo hace, https://extensions.libreoffice.org/exte ... ible-cells

en OpenOffice funciona pero parece que no instala la barra con el icono para utilizarlo por lo que tienes que hacerlo a través de Menú/Herramientas/Personalizar/Barras de Herramientas, desde las Macros de OpenOffice - Macros de OpenOffice - SelVisiCell y después asignarle un botón.

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Jue Nov 22, 2018 2:41 am
por physic
sr. mriosv ,

Si no puedo hacer a través de macro, entonces voy a hacer a través de su sugerencia

Muchas gracias por la colaboración muy buena


abrazos amigo

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Vie Nov 23, 2018 4:11 am
por arivas_2005
Saludos.

hace algún tiempo resolví este procedimiento.
Entre consultas al foro y búsquedas, .. al final, ya no recuerdo dónde encontre el contenido de la macro :oops: que me sirvio a mis propósitos (copia cada celda no oculta en un rango, con su contenido y su formato. Observar ejemplo).
Adjunto el libro. Ojalá sea una guía para la solución buscada.
éxitos!

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Vie Nov 23, 2018 11:57 am
por physic
saludos arivas_2005 ,

en primer lugar quiero dar las gracias por ayudarme

no funcionó para mí la macro pegar las celdas visibles de su archivo

me adjunto el archivo "visibile" para pedirle que usted aplique su macro en este archivo "visibile"

desde ahora estoy agradecido al señor


abrazos

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Vie Nov 23, 2018 7:32 pm
por fornelasa
Así de bote pronto, parece que con una macro generada con la grabadora de macros funcionaria.
Pulsa el botón rojo.
Código: Seleccionar todo   Expandir vistaContraer vista
Worksheets("Plan2")
Usas la hoja llamada Plan2
Saludos, Federico.

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Vie Nov 23, 2018 8:15 pm
por physic
sr Federico

gracias por querer ayudar

el problema es que la cantidad de Líneas y Columnas en la Hoja 1 va a cambiar siempre, o sea, tendremos cantidades diferentes de Líneas y Columnas para Copiar

entonces debe ser con Macro programada

también necesita Colar varias veces continuas, una debajo de la otra en secuencia en la hoja de cálculo 2, para guardar el historial


abrazos mi amigo

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Vie Nov 23, 2018 9:13 pm
por fornelasa
El problema es que la cantidad de Líneas y Columnas en la Hoja 1 va a cambiar siempre, o sea, tendremos cantidades diferentes de Líneas y Columnas para Copiar
Bueno no sé a que te refieras con eso.
La macro que envíe puede trabajar con 2 columnas, con 10, con 500 con 1000, también puede trabajar con 100 filas con 5000 con 500000 con 750000.

entonces debe ser con Macro programada
La macro que envié es programada.

también necesita Colar varias veces continuas, una debajo de la otra en secuencia en la hoja de cálculo 2, para guardar el historial
No lo habías comentado previamente, y creo que la macro que envíe hace exactamente lo que hace la macro de Excel que subiste.

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Vie Nov 23, 2018 11:12 pm
por physic
sigue adjunto la hoja de cálculo con los nuevos resultados de la macro ejecutada

hice un modelo con menos líneas para poder analizar más fácil

he comprobado que la macro no copia los bloques iniciales que he mencionado, A para E, I para L, U para W

la macro está copiando todas las columnas de A a W


abrazos amigo

Re: Copiar celdas visibles y pegar valores en otra hoja

NotaPublicado: Dom Nov 25, 2018 9:50 pm
por physic
[RESUELTO]

gracias a todos los amigos que contribuyeron con la información


abrazos

Re: [Resuelto] Copiar celdas visibles pegar valores en otra

NotaPublicado: Mar Nov 27, 2018 3:06 pm
por mauricio
Por favor, toma nota de que la forma correcta de marcar es [RESUELTO], gracias.