Excel - colunas para uma célula

7

Você pode ter uma coluna de dados movida para uma única célula com vírgulas separando os valores que estavam na coluna? Tipo de texto reverso para colunas.

por exemplo,

1
2
3
4
5

para 1,2,3,4,5 em uma única célula.

    
por John 23.03.2012 / 23:03

9 respostas

7

Usar uma função definida pelo usuário será muito mais flexível do que a codificação por célula por célula

  • Pressione alt & f11 juntos para irem ao VBE
  • Inserir módulo
  • copie e cole o código abaixo
  • Pressione alt & f11 juntos para voltar ao Excel

use sua nova fórmula como a do snapshot da célula D6 em =ConCat(A1:A5)

Você pode usar fórmulas mais complexas, como a do D7
=ConCat(A1:A5,A7:A24)
ou D8 que é 2D em =concat(A1:B5,A7:A24)

FunctionConCat(ParamArrayrng1())AsStringDimXDimstrOutAsStringDimstrDelimAsStringDimrngAsRangeDimlngRowAsLongDimlngColAsLongDimlngCntAsLongstrDelim=", "
    For lngCnt = LBound(rng1) To UBound(rng1)
        If TypeOf rng1(lngCnt) Is Range Then
            If rng1(lngCnt).Cells.Count > 1 Then
                X = rng1(lngCnt).Value2
                For lngRow = 1 To UBound(X, 1)
                    For lngCol = 1 To UBound(X, 2)
                        strOut = strOut & (strDelim & X(lngRow, lngCol))
                    Next
                Next
            Else
                strOut = strOut & (strDelim & rng2.Value)
            End If
        End If
    Next
    ConCat = Right$(strOut, Len(strOut) - Len(strDelim))
End Function
    
por 24.03.2012 / 04:07
4
  • Primeiro, faça

    =concatenate(A1,",")
    

    na próxima coluna ao lado da que você tem valores.

  • Em segundo lugar, copie toda a coluna e vá para outra folha do Colar Especial- > Transpor.

  • Em terceiro lugar, copie o valor que acabou de adquirir e abra um documento do Word e, em seguida, escolha Opções de colagem - > escolha "A",
  • Por fim, copie tudo no documento do Word de volta para uma célula em uma planilha do Excel, você obteria todos os valores em uma célula
por 17.09.2012 / 07:30
2

Você pode usar a função concatenar e alternar entre as células e a string "," :

=CONCATENATE(A1,",",A2,",",A3,",",A4,",",A5)
    
por 23.03.2012 / 23:11
1

Se for uma coluna de valores, você pode usar a função CONCATENATE, mas fazer isso rapidamente é um pouco complicado. Assumindo que as células eram A1: A10, em B9 e B10 colocamos estas fórmulas:

B9: = A9 & "," & B10

B10: = A10

Agora, copie B9 e cole todas as células no topo da coluna B.

Em B1, você terá seu resultado completo. Copiar > Colar especial > Valores.

    
por 24.03.2012 / 02:12
1

O bloco de notas é o mais simples e rápido. No Excel, adicionei uma coluna para executar números na coluna A. Meus dados estão na coluna B. Então copiou a coluna A & B para o bloco de notas. Removido os espaços extras usando a função de substituição no bloco de notas. Copiado do bloco de notas e colado de volta para o excel na célula única eu queria os dados dentro Tudo feito. Nenhum VB necessário!

    
por 31.01.2016 / 08:06
0

Solução melhor e simples a seguir:

Selecione o intervalo das colunas que você deseja copiar para uma única coluna

Copie o intervalo de células (várias colunas)

Abra o Notepad ++

Cole o intervalo de células selecionado

Pressione Ctrl + H, substitua \ t por \ n e clique em substituir todos

todas as colunas múltiplas se enquadram em uma única coluna

agora copie o mesmo e cole no excel

Solução simples e eficaz para quem não quer perder tempo codificando em VBA

    
por 09.11.2015 / 11:22
0

Resposta surpreendente, karthikeyan. Eu não queria perder tempo em VB ou mesmo para escapar do Ctrl + H. Isso seria mais simples, e estou fazendo isso.

  1. Insira uma nova linha na parte superior (A).
  2. Logo acima do número 1 (ou seja, na A1), digite um caractere de igual (=).
  3. Copie / cole uma vírgula (,) de B1 a B23 (não em B24).
  4. Selecione A1 para B24, copie / cole no bloco de notas.
  5. No Bloco de Notas, pressione (Selecionar Tudo) Ctrl + A, pressione (Copiar) Ctrl + C, em seguida, clique dentro de uma única célula no Excel (F2), depois (Colar) Ctrl + V.
por 04.01.2016 / 05:32
0

A maneira mais fácil de combinar uma lista de valores de uma coluna em uma única célula é a utilização de uma fórmula simples de concatenação. 1) Inserir nova coluna 2) Insira a fórmula de concatenação usando a coluna que você deseja combinar como o primeiro valor, um separador (espaço, vírgula, etc) como o segundo valor e a célula abaixo da célula na qual você colocou a fórmula como o terceiro valor. 3) Arraste a fórmula para baixo até o final dos dados na coluna de interesse 4) Copiar & cole valores especiais na coluna recém-criada para remover as fórmulas e BOOM! ... todos os valores estão agora na célula superior.

Por exemplo, a fórmula a seguir combinará todos os valores listados na coluna A na célula C3 com um ponto-e-vírgula separando-os = CONCATENAR (A3, ";", C4)

    
por 21.08.2018 / 20:33
-1

Aqui está uma maneira rápida ... Inserir uma coluna de "," ao lado de cada valor usando preenchimento. Coloque uma fórmula CONCATE, em qualquer lugar, com as duas colunas no intervalo. O resultado é uma única célula, lista concatenada com vírgulas e um espaço após cada.

    
por 27.05.2017 / 00:20