Como dividir / separar strings alfanuméricas em duas colunas no Excel?
Separar strings alfanuméricas em duas colunas — uma para números e outra para letras — pode ajudar na gestão de dados. Neste artigo, mostrarei métodos úteis para dividir essas strings em colunas individuais.
Divida / Separe strings alfanuméricas em duas colunas com Função Definida pelo Usuário
Divida / Separe strings alfanuméricas em duas colunas com Kutools para Excel
Divida / Separe strings alfanuméricas em duas colunas com Função Definida pelo Usuário
Por exemplo, tenho um intervalo de strings alfanuméricas para dividir em duas colunas, conforme mostrado na captura de tela abaixo:
Aqui, posso criar uma Função Definida pelo Usuário para resolver essa tarefa; por favor, siga os passos abaixo:
1. Pressione e segure as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.
Código VBA: separar strings alfanuméricas em duas colunas:
Function RetNum(Str As String)
'updateby Extendoffice
Dim xRegEx As Object
Set xRegEx = CreateObject("vbscript.regexp")
xRegEx.Global = True
xRegEx.Pattern = "[^\d]+"
RetNum = xRegEx.Replace(Str, "")
Set xRegEx = Nothing
End Function
Function RetNonNum(Str As String)
Dim xRegEx As Object
Set xRegEx = CreateObject("vbscript.regexp")
xRegEx.Global = True
xRegEx.Pattern = "[\d]+"
RetNonNum = xRegEx.Replace(Str, "")
Set xRegEx = Nothing
End Function
3. Após salvar e fechar o código, retorne à planilha e insira esta fórmula =retnonnum(A2) em uma célula em branco. Arraste a alça de preenchimento para baixo para aplicar a fórmula a outras células, e todos os caracteres alfabéticos serão extraídos da coluna de referência. Veja a captura de tela:
4. Continue inserindo esta fórmula: =retnum(A2) em outra célula em branco e arraste a alça de preenchimento para baixo nas células que conterão esta fórmula; então, todos os números serão retornados conforme mostrado na captura de tela a seguir:
Divida / Separe strings alfanuméricas em duas colunas com Kutools para Excel
Se você possui o Kutools para Excel, com sua ferramenta Dividir Células, você pode dividir rapidamente as strings alfanuméricas em colunas separadas.
Após instalar o Kutools para Excel, por favor, faça o seguinte:
1. Selecione as strings alfanuméricas que deseja separar.
2. Clique em Kutools > Mesclar e Dividir > Dividir Células, veja a captura de tela:
3. Na caixa de diálogo Dividir Células, selecione Dividir Dados sob a seção Tipo, e depois escolha Dividir por Texto e Número na seção Separador, veja a captura de tela:
4. Em seguida, clique no botão Ok, e uma caixa de aviso aparecerá para lembrá-lo de selecionar uma célula onde você precisa localizar o resultado separado, veja a captura de tela:
5. E depois clique em OK, os caracteres alfabéticos e os números são separados em duas colunas imediatamente, veja a captura de tela:
Kutools para Excel - Potencialize o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Obtenha Agora
Demonstração: Divida / Separe strings alfanuméricas em duas colunas com Kutools para Excel
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins