Unir várias células da mesma coluna em uma única célula

Question

Bom dia,

Estou levantando uma relação de notas fiscais e queria unir em uma única célula várias células da mesma coluna separadas por virgula.

Por exemplo: tenho a coluna G onde eu ordenei por sequencia do menor para o maior e em outra célula vazia eu quero unir as células G4 até G3690 separado por virgula, mas eu queria uma formula mais rápida, o CONTATENAR eu tenho que colocar célula por célula e como é muitas, eu perco muito tempo.

O meu Excel é a versão 2013 em português.

Alguém consegue me ajudar?

***Moved from Microsoft 365 and Office / Excel / For the job / Windows***

Answer 1

En este caso, puedes usar esta macro:

Sub UnirCeldasConComas()

    Dim Rango As Range

    Dim Celda As Range

    Dim Resultado As String

    ' Cambia A1:A10 por el rango de celdas de tu columna

    Set Rango = Range("A1:A10")

    For Each Celda In Rango

        If Celda.Value <> "" Then

            Resultado = Resultado & Celda.Value & ", "

        End If

    Next Celda

    ' Elimina la última coma y espacio

    Resultado = Left(Resultado, Len(Resultado) - 2)

    ' Muestra el resultado en la celda D1

    Range("D1").Value = Resultado

End Sub

PalabraExperto.

Answer 2

Boa tarde, espero que esteja tudo bem com você

Vi que esta formula só funciona no Office 2019, o meu é 2013, não funciona.

Tem outra formula que eu possa usar?

Answer 3

Hola, Alexandre:

Puedes usar la funciónunircadenas.

Yo la uso en este vídeo para otro caso, distinto al tuyo.

WordExperto.