MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


3 participantes

    [Resolvido]encontrar palavra dentro de uma frase

    avatar
    rui.o.pereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 20
    Registrado : 19/01/2014

    [Resolvido]encontrar palavra dentro de uma frase Empty [Resolvido]encontrar palavra dentro de uma frase

    Mensagem  rui.o.pereira 11/5/2014, 22:13

    viva,
    há alguma função que permita encontrar palavra dentro de uma frase ?

    a função instr retorna o índice da ocorrência de um determinado caratere.


    eu pretendo verificar se uma palavra existe (ou não) dentro de uma frase.

    Existe alguma solução "simples" ou tenho de usar a função instr e ir "contando" e "comparando"  cada letra que encontrar a seguir ?



    Exemplo da frase: "Rui Manuel de Oliveira Pereira, Pinheiro, 2490, Ourém, Portugal"

    Agora para encontrar a palavra "2490" uso a função Instr ?

    Já procurei no "buscar" mas não encontrei nada...

    Alguém tem uma ideia?
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3883
    Registrado : 04/04/2010

    [Resolvido]encontrar palavra dentro de uma frase Empty Re: [Resolvido]encontrar palavra dentro de uma frase

    Mensagem  Avelino Sampaio 12/5/2014, 09:27

    Olá!

    É com a função inStr() mesmo. Você pode utilizar caracter, palavra ou frase para realizar a busca.

    If instr("Rui Manuel de Oliveira Pereira, Pinheiro, 2490, Ourém, Portugal","2490") > 0 then
      msgbox "existe..."
    end if


    Pode indicar o campo que possui a frase direto na função:

    If instr(me!NomeCampoFrase,"2490") > 0 then
    msgbox "existe..."
    end if


    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    rui.o.pereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 20
    Registrado : 19/01/2014

    [Resolvido]encontrar palavra dentro de uma frase Empty Re: [Resolvido]encontrar palavra dentro de uma frase

    Mensagem  rui.o.pereira 12/5/2014, 17:46

    Ok, "BRIGADÍSSIMO", Avelino!

        Vou experimentar, (isso não me tinha passado pela cabeça..)

        A verdade é que quero ver se há algum registo cujo campo se encontra numa celula/área de excel.
    (podem ser moradas, escolas, nomes, notas, enfim...  e estou a testar o que é que cada uma tem....)

    Código:

    <pre>

    Public Function a_celula_e_uma_escola(ByVal v As String) As Boolean
       'Dim a_celula_e_uma_escola As Boolean
       a_celula_e_uma_escola = False
       Dim cursor_escola As DAO.Recordset
       Dim texto As String
       Set cursor_escola = BaseDeDados.OpenRecordset("Escola")
       While Not cursor_escola.EOF
          texto = cursor_escola.Fields(1).Value
        <b> If (InStr(texto, v) > 0) Then </b>
               CODIGO_ESCOLA = texto
               a_celula_e_uma_escola = True
           End If
           cursor_escola.MoveNext
       Wend
       
    End Function

    </pre>



    é mais ou menos isto....
    gilberlanio
    gilberlanio
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 806
    Registrado : 30/08/2010

    [Resolvido]encontrar palavra dentro de uma frase Empty Re: [Resolvido]encontrar palavra dentro de uma frase

    Mensagem  gilberlanio 6/2/2024, 18:33

    Olá pessoal. Usei o código abaixo disponibilizado pelo Avelino e funciona perfeitamente para encontrar uma palavra específica dentro do texto.
    Agora preciso que ao localizar a palavra substiua por outra. A outra palavra já tenho armazezada em uma variável.

    Alguém sabe como fazer?


    If instr(me!NomeCampoFrase,"2490") > 0 then
    msgbox "existe..."
    end if
    gilberlanio
    gilberlanio
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 806
    Registrado : 30/08/2010

    [Resolvido]encontrar palavra dentro de uma frase Empty Re: [Resolvido]encontrar palavra dentro de uma frase

    Mensagem  gilberlanio 6/2/2024, 18:38

    Conseguiu uma solução, ficou assim:

    minhaCaixaDeTexto = Replace(minhaCaixaDeTexto , "fraseDoTexto", "NovaFrase")

    Conteúdo patrocinado


    [Resolvido]encontrar palavra dentro de uma frase Empty Re: [Resolvido]encontrar palavra dentro de uma frase

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 23/5/2024, 00:54