Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

Como formar una columna de datos cortando y pegando a partir de otras

ANDERSONES

New member
Registrado
8 May 2021
Mensajes
2
Hola mi problema es el siguiente, estoy haciendo una wordlists (Lista de palabra) en una hoja de Excel, y estoy ordenando una series de columnas en una sola y quisiera que esas palabras estén...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 

Adjuntos

Solución
Prueba:

Sub WordList_LBV()
Dim n&, uFO&, uFD&
Hoja2.Range("A:A").Clear
For n = 1 To Hoja1.Range("A1").CurrentRegion.Columns.CountnCol
uFD = IIf(n = 1, Hoja2.Range("A" & Rows.Count).End(xlUp).Row, Hoja2.Range("A" & Rows.Count).End(xlUp).Row + 1)
uFO = Hoja1.Cells(Rows.Count, n).End(xlUp).Row
Hoja1.Range(Cells(1, n), Cells(uFO, n)).Copy Hoja2.Range("A" & uFD)
Next n
End Sub

Saludos.
Volver
Arriba