Como converter uma célula em várias células/linhas no Excel?
Às vezes, é difícil visualizar todos os dados se houver muitos dados em uma célula no Excel. Nesse caso, converter todos os dados dessa célula em várias células ou linhas pode facilitar e tornar mais claro a visualização de conteúdo longo, conforme mostrado abaixo. No Excel, você pode fazer isso através dos seguintes métodos.
Converter uma célula em várias células/linhas com Texto para Colunas e Colar Especial no Excel
Converter uma célula em várias colunas/linhas com Kutools para Excel
Converter uma célula em várias células/linhas com VBA
Converter uma célula em várias células/linhas com Texto para Colunas e Colar Especial no Excel
1. Selecione a célula que deseja converter seus dados e clique em Dados > Texto para Colunas, veja a captura de tela:
2. Na caixa de diálogo que aparece, marque a opção Delimitador e clique em Próximo. Veja a captura de tela:
3. Marque apenas a caixa de seleção Vírgula na caixa de diálogo e clique em Concluir. Veja a captura de tela:
4. Em seguida, você pode ver que os dados da célula foram divididos em várias colunas. Agora selecione essas células, clique com o botão direito e escolha Copiar no menu de contexto para copiá-las. Veja a captura de tela:
5. Selecione uma célula em branco e clique com o botão direito para selecionar Transpor (T), então você pode ver que os dados foram convertidos em várias linhas. Veja a captura de tela:
Se você estiver usando o Microsoft Excel 2007, clique em Início > Colar > Transpor para colar os dados divididos.
Você pode ver o resultado conforme mostrado:
Converter uma célula em várias colunas/linhas com Kutools para Excel
Se você possui o Kutools para Excel -- uma ferramenta prática instalada, você pode usar sua função Dividir Células para dividir rapidamente uma única célula em várias colunas ou linhas com base em um delimitador.
Após instalar o Kutools para Excel, siga os passos abaixo:
1. Selecione a célula que deseja dividir em linhas e clique em Kutools > Mesclar & Dividir > Dividir Células. Veja a captura de tela:
2. Em seguida, na caixa de diálogo Dividir Células, marque a opção Dividir em Linhas na seção Tipo e marque a opção Outro na seção Separador, depois insira o delimitador desejado para dividir a célula na caixa de texto. Veja a captura de tela:
3. Clique em Ok, e uma caixa de diálogo aparecerá para lembrá-lo de selecionar uma célula para exibir o resultado da divisão.
4. Clique em OK. Agora você pode ver que uma célula foi convertida em várias linhas.
Dica: Se você quiser converter uma única célula em colunas com base em um delimitador específico, marque a opção Dividir em Colunas na caixa de diálogo e insira o delimitador na caixa de texto Outro.
Converter uma célula em várias células/linhas com VBA
Se você acha que o método acima é um pouco tedioso, pode usar um VBA para realizar essa tarefa.
1. Mantenha pressionado o botão ALT e pressione F11 no teclado para abrir uma janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e copie o VBA para o módulo.
VBA: Converter uma célula em várias linhas
Sub TransposeRange()
'Updateby20140312
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection.Range("A1")
Set InputRng = Application.InputBox("Range(single cell) :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Arr = VBA.Split(InputRng.Range("A1").Value, ",")
OutRng.Resize(UBound(Arr) - LBound(Arr) + 1).Value = Application.Transpose(Arr)
End Sub
3. Clique em Executar para executar o código VBA, e uma KutoolsforExcel caixa de diálogo aparecerá para você selecionar uma única célula cujos dados deseja converter. Veja a captura de tela:
4. Clique em OK, e em outra caixa de diálogo que aparecer, selecione uma célula para exibir o resultado. Veja a captura de tela:
Você pode ver o resultado:
Dica: No código VBA acima, você pode alterar o separador "," pelo qual deseja separar os dados. Este VBA não suporta a divisão de células com base no caractere de nova linha.
Artigos Relacionados:
- Utilitário Transpor Intervalo: Converta facilmente várias linhas em colunas e vice-versa no Excel
- Ferramenta Conversor de Unidades: Converta rapidamente números decimais em binários/octais/hexadecimais ou vice-versa
Melhores Ferramentas de Produtividade para Office
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!