LOCALIZAR CARACTERE EM UM TEXTO

 Tópico anterior Próximo tópico Novo tópico

LOCALIZAR CARACTERE EM UM TEXTO

VB / VBA

 Compartilhe  Compartilhe  Compartilhe
#479658 - 16/02/2018 19:36:21

JORGESALES
CEARA
Cadast. em:Maio/2015


Pessoal existe a possibilidade de contar determinado
caractere em um texto?
Eu gostaria de contar quantas vezes a letra "J" aparece
em uma textbox, isso é possível?

Cursos de Excel e VB6:
www.cursoexcelvba.com.br



Resposta escolhida #479659 - 16/02/2018 19:42:18

MARIOANDRADE
SANTO ANTONIO DE JESUS
Cadast. em:Abril/2012


Veja se este exemplo ajuda:
Public Function ContaCaracteresNaString(ByVal texto As String, ByVal caracter As String) As Long
     Dim x As Variant
     x = Split(texto, caracter)
     ContaCaracteresNaString = UBound(x)
End Function

Public Sub Teste()
     MsgBox ContaCaracteresNaString("janeiro|fevereiro|março|abril|", "|")
End Sub


    Cursos de Excel e VB6:
    www.cursoexcelvba.com.br



#479663 - 17/02/2018 00:28:52

JORGESALES
CEARA
Cadast. em:Maio/2015


Obrigado professor, deu certo.

Cursos de Excel e VB6:
www.cursoexcelvba.com.br



 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por JORGESALES em 17/02/2018 00:29:03