Separar una celda que contiene Ctrl+J en filas

Primero que nada, que pro ud. Amigo...

He visto varias consultas en varios canales de como separar una celda que contiene varias filas (separadas por enter o control+j) en tantas filas como separadores contiene la celda, ¿Lo has visto? ¿Tienes algo parecido?

Como ejemplo, esta seria una única celda con frutas enumeradas del 1 al 3, ¿Como separar de forma las 3 frutas en 3 filas en un excel.

1.- Banana

2.- Manzana

3.- Papaya

2 Respuestas

Respuesta
1

Estos ejemplos quizás se ajuste a lo que requieres o por lo menos en parte o te de una idea

https://youtu.be/xrnRXULC6QE

https://youtu.be/XLxuc-k8-FM

https://youtu.be/YIdGYKz_f5Q

Respuesta
2

¿Tu dices algo así?

esta es la macro que ocupas en caso de ser si tu respuesta

Sub separa_en_filas()
celda = Range("b2"): separa = Split(celda, " ")
For i = 1 To UBound(separa)
    largo = Len(separa(i))
    x = 1
    For j = 1 To largo
        caracter = Left(Right(separa(i), j), 1)
            If IsNumeric(caracter) = True Then
                fruta = Left(separa(i), largo - x - 1)
                Range("d1").Offset(i, 0) = fruta
                Exit For
            End If
        x = x + 1
    Next j
Next i
Range("d1").Offset(i - 1, 0) = separa(i - 1)
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas