Função para extrair somente caracteres de célula Excel VBA

Excel 2013
Excel 2013
29 de dezembro de 2012
Planilha de Controle de Estoque Excel
Planilha de Controle de Estoque Excel
20 de fevereiro de 2013

Objetivo: Retirar somente caracteres de células Excel VBA.

ExtrairNumeros

A função demonstrada neste artigo foi criada em VBA e para inseri-la no Excel você deve seguir os passos descritos neste artigo: http://guiadoexcel.com.br/criando-funcoes-proprias-globais.

Abaixo o código fonte que deve ser inserido:

'Função que retira somente o texto da célula
Public Function lfExtrairCaracteres(vPesquisa As Range) As String
    Dim lQtde As Long

    Application.Volatile

    'Recebe o valor da célula
    lfExtrairCaracteres = vPesquisa.Text

    'Retira os caracteres de 0 a 9, trocando-os por ""
    For lQtde = 0 To 9
        lfExtrairCaracteres = Replace(lfExtrairCaracteres, lQtde, "", 1)
    Next lQtde

End Function

Conforme a explicação na função, o resultado é que todos os caracteres que são numéricos são exclusos do resultado da função, de modo que somente sobrem as letras.

Abraço

Marcos Rieper


Clique aqui e leia mais sobre Excel VBA. https://www.guiadoexcel.com.br/vba/ O Guia do Excel foi criado por Marcos Rieper e oferece artigos, dicas, tutoriais e modelos de planilhas prontas. Aqui você encontra tudo sobre Excel, seja de nível básico, intermediário,  avançado e VBA. O Guia do Excel oferece diversos materiais completamente gratuitos para download. Navegue em nosso site e confira! Conheça também a nossa Loja do Excel https://loja.guiadoexcel.com.br/
Cursos

Curso Excel Completo – Curso Excel Básico + Curso Excel Avançado – Acesso Vitalício

R$218,00 R$179,00

COMPRAR
Cursos

Curso Excel Master – Curso Excel Básico + Curso Excel Avançado + Curso VBA Excel + LP – Acesso Vitalício

R$357,00 R$249,00

COMPRAR
Cursos

Curso Excel PRO – Curso Excel Avançado + Curso VBA Excel + Lógica de programação – Acesso Vitalício

R$258,00 R$199,00

COMPRAR
Cursos

Curso Excel Web – Curso VBA Excel + Lógica de programação + Curso Web Scraping VBA- Acesso Vitalício

R$388,90 R$309,00

COMPRAR

4 Comentários

  1. Júlio disse:

    E qual a função que eu insiro nesse VBA pra retirar parênteses () ? Tanto abre, quanto fecha.

    Obrigado!

  2. Júlio disse:

    Lógico, agora é só retirar os parênteses pelo Localizar e Substituir.

    Obrigado!

  3. Dercides disse:

    Poderia passar qual a formula?

Deixe uma resposta

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Esse site utiliza o Akismet para reduzir spam. Aprenda como seus dados de comentários são processados.

Inscreva-se no nosso canal do Youtube!


Junte-se ao nosso canal do Youtube. Começamos em abril de 2016, mas já temos mais de 06:00 h de treinamentos gratuitos e este número irá aumentar. Vídeos novos todos os sábados.