Usando VBA macro recorder do Excel para fazer um programa que divide uma única coluna em várias colunas envolve não muito mais do que um único clique do mouse. Dividir várias colunas apresenta um problema ; separação da primeira coluna irá substituir o texto que deseja dividir em colunas subseqüentes. Por essa razão , a função " TextToColumn " irá exibir uma mensagem de erro , em vez de dividir a coluna. Por escalonamento do conteúdo a ser dividida em várias linhas , você evitar que isso ocorra . Instruções
1
Clique no botão " Visual Basic" no guia do desenvolvedor para entrar no ambiente de programação Visual Basic for Applications , que permite que você digite e depurar programas VBA.
2
Clique na "Inserir " item " Module" do guia para criar uma nova janela para inserir programas. VBA criará a janela.
3
Cole o seguinte programa para a janela . Este programa usa a função " TextToColumns " para dividir texto separado por espaços. O argumento de " Tipo de dados " conta a função que você deseja dividir o texto com base em um personagem específico dentro do texto, e não com base em um número fixo de caracteres por coluna. O "Espaço" argumento da função é definido como "True ", indicando que o Excel deve dividir o texto baseado no personagem "Espaço" .
Public Sub TextToColumnsMultiple ()
Dim col, x
Para Cada col Em Selection.Columns
conjunto X = col
x.Select
Selection.TextToColumns DataType : = xlDelimited , _ < br >
TextQualifier : = xlDoubleQuote , ConsecutiveDelimiter : = True , Tab: = False , _
Ponto e vírgula : = False , Comma : = False , Space: = true , Outros : = False , TrailingMinusNumbers : = _
verdadeira
Próxima
Sub End
4
Clique no ícone " Excel " na barra de tarefas do Windows para retornar ao Excel , em seguida, digite uma frase com pelo menos duas palavras separadas por espaço em qualquer célula da planilha. Digite outro tal sentença na célula que é um baixo e uma para a direita da primeira célula
5
Clique . Primeira célula para selecioná-lo , em seguida, pressione e segure a tecla Ctrl para contar Excel você quer para selecionar mais de uma célula .
6
Clique no botão " desenvolvedores" da aba " Visual Basic " para exibir uma lista de programas . Dê um duplo clique no item " TextToColumnsMultiple " para executar o programa. As frases que você digitou está agora dividido em várias colunas, com uma coluna por palavra .