Texto em colunas no Excel com VBA

Objetivo: Este artigo apresenta a criação de uma macro para separar arquivos texto no Excel em colunas automaticamente.

É extremamente útil para quem tem que abrir relatórios em TXT ou CSV ou formato que o valha e diariamente tenha que realizar a sua separação em colunas, como por exemplo em relatórios de vendas, relatórios contábeis, arquivos bancários como extratos e recebimentos.

Você pode acompanhar pelo vídeo abaixo ou pelo tutorial escrito como preferir.

Para seguir este passo-a-passo realize o download do arquivo texto:

Baixe a planilha
  1. Abra o Excel
  2. No Excel, clique em abrir e altere o campo “Arquivos do tipo” para “Todos os arquivos (*.*)“, localize desta forma o arquivo texto que você realizou o download
  3. Selecione o arquivo texto, ainda sem clicar em abrir
  4. Com o arquivo selecionado pressione CTRL+SHIFT+ENTER, este comando fará com que o arquivo seja aberto na íntegra em uma só coluna.

Criando a Macro

Pronto! A sua macro para abrir este tipo de arquivo texto estará pronta, sendo que para testar você deve fechar o arquivo texto sem Salvar o arquivo texto, porém salvando a Macro criada caso o Excel questione.

Depois abra o arquivo texto seguindo os mesmos passos do início do post, selecionando o arquivo e pressionando as teclas CTRL+SHIFT+ENTER.

Após abrir o arquivo execute a macro, pressionando a tecla de atalho que você determinou na gravação, no nosso caso seria CTRL+SHIFT+o.

O seu arquivo será separado em colunas automaticamente dentro do padrão determinado.

Dica: Você pode melhorar este exemplo realizando formatações diretamente sobre as colunas criadas, adicionando uma linha no início e colocando cabeçalhos, caso o seu arquivo não tenha, colocando negrito, etc. [saiba_mais]

Sair da versão mobile