Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como usar o texto para a coluna em várias colunas em VBA
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 .

Anterior :

Próximo : No
  Os artigos relacionados
·Como adicionar uma caixa de texto Valor de uma lista em…
·Como limpar e preencher caixas de listagem no Visual Ba…
·Como fazer uma proteção de tela no Visual Basic 2010 
·Como alocar uma matriz 5D 
·Como fazer um botão de reset no VBA 
·Como desativar direcionais Chaves 
·Como preencher DataSet & Bind DataGridView em diferente…
·Como fazer um Converter numerais romanos no código VB 
·Como receber o sinal de saída em VB6 usando uma porta …
·Como criar Documentação Vb.Net 
  Artigos em destaque
·Como alterar a barra de endereços no JavaScript 
·Como Incorporar EXE em Python 
·Quais são Atributo Chaves 
·Verificação de entrada Java 
·Como criar Olá Mundo em Microsoft Visual C 2010 Expres…
·Como Construir um dicionário em Python 
·Como importar Cordas em Java 
·Struts Basics Tutorial 
·Como mudar a imagem SRC em jQuery 
·Como você exibir o número de caracteres em uma seqüê…
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados