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

5 participantes

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2166
    Registrado : 23/01/2018

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  crysostomo 27/5/2021, 01:13

    Boa noite meus amigos.
    Eu já tenho uma monte de nomes com acentos (João, Marlúcia ...)
    Estou pretendendo  dar replace nos campos do formulário, mas vai problema futuro.
    Tem possibilidade de tirar todo acento dos registro da tabela em através de código?


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2594
    Registrado : 13/12/2016

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  Alexandre Fim 27/5/2021, 13:25

    Crysostomo bom dia,

    Sim. É possível remover os acentos das palavras através de uma função.
    Mas vc também precisa tratar os dados para que não sejam gravados com acentuação.
    Se você utiliza somente o Access como banco de dados, não há problema em manter as palavras acentuadas, mas se migrar para outros bancos de dados (Ex.: MySQL), provavelmente você terá problemas, mas que é totalmente configurável nestes bancos (Propriedade "Collate" e "CHARSET" do database....mas ai é outra história...)

    Por gentileza, me manda um banco de dados com 1 tabela somente e eu desenvolvo esta rotina para você, e ai vc aplica às demais tabelas do seu banco.

    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Setinf11
    Sistemas e Tecnologia Ltda
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  Alvaro Teixeira 27/5/2021, 14:33

    Olá a todos,

    Exatamente como Alexandre indicou.
    Gilliard , esse tema já foi abordado diversas vezes no fórum, não se esqueça da "Pesquisa"
    https://www.maximoaccess.com/t2318-resolvidoretira-acentos

    Depois deve colocar no formulário que é feita a introdução dos dados a chamada da função.
    Pode ser no evento antes de atualizar.

    Se tiver dificuldades partilhe conforme colega Alexandre sugeriu.

    Abraço a todos
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2166
    Registrado : 23/01/2018

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  crysostomo 28/5/2021, 01:00

    Boa noite.
    Em anexo
    Teixeira eu realmente pesquiso, mas algumas coisas não consigo encontrar.


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  Alvaro Teixeira 28/5/2021, 17:52

    Ola a todos,

    Faltou anexo, quanto a funcao ja indiquei um topico mas tem mais.

    Abraco
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2166
    Registrado : 23/01/2018

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  crysostomo 28/5/2021, 23:43

    Boa noite. Também seria viável deixar e no campo pesquisasse com ou sem acento, mas o Like esta dando problema.
    Teixeira eu quero tirar de banco e não de formseu quero tirar do banco
    Eita Cara dei outro erro, criei tópico de tabela no tópicos de formulário.
    senha :gilliard**
    Anexos
    [Resolvido]Tirar todo acento que ja tem nos registros da tabela AttachmentBACK- END (MANDADO JUDICIAL).zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (802 Kb) Baixado 20 vez(es)


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  Alvaro Teixeira 29/5/2021, 21:27

    Ola a todos,

    Olha para ignorar acentuacao:
    https://www.maximoaccess.com/t13366-resolvidodigitar-em-caixa-de-texto-do-access-e-fazer-o-mesmo-efeito-do-excel

    Quanto ao exemplo estou no celular, pode ser que algum colega verifique e o possa ajudar.

    Abraço
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2166
    Registrado : 23/01/2018

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  crysostomo 16/9/2021, 12:48

    Bom dia amigo, Reabri esse tópico pois na verdade eu não queria tirar acentos, somente fazer a busca independente do acentos.
    Mesmo com o like não consigo fazer a busca, idem
    Código:
    Como "*" & [Forms]![from_lista_de_busca]![txt_campo_pesquisa].[Text] & "*"
    São muitos cadastro e processos Adm e judicial cadastrado, seria legal a busca com ou sem acentos porque. Já fiz a busca pela ajuda de você é mesmo
    drive.google.com/file/d/1fKRnF7QE1lxyMbAIIz4Viaa0j8ICCfr-/view?usp=sharing


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10765
    Registrado : 04/11/2009

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  JPaulo 16/9/2021, 15:42

    Mensagem Nº 10 deste tópico;

    https://www.maximoaccess.com/t16558-resolvidoconsulta-acentuacao-palavras

    Num módulo cole:

    Código:
    Public Function TodosAcentos(pstrPlain As String) As String
         Const cAlphabet _
            = "aáàâäãå¦" _
            & "cç¦" _
            & "dð¦" _
            & "eéèêë¦" _
            & "f?¦" _
            & "iíìîï¦" _
            & "nñ¦" _
            & "oóòôöõø¦" _
            & "saߦ" _
            & "uúùûü¦" _
            & "yýÿ¦" _
            & "z~"
        
        Dim strAcc() As String
        Dim strLike As String
        Dim intN As Integer
        Dim strP As Integer
        Dim strC As String
        
        strAcc = Split(cAlphabet, "¦")
        For strP = 1 To Len(pstrPlain)
            strC = Mid$(pstrPlain, strP, 1)
            For intN = LBound(strAcc) To UBound(strAcc)
                If InStr(strAcc(intN), strC) <> 0 Then
                    strC = "[" & strAcc(intN) & "]"
                    Exit For
                End If
            Next intN
            strLike = strLike & strC
        Next strP
        
        TodosAcentos = strLike
    End Function

    Chame a função assim:

    Código:
    Like "*" & TodosAcentos([Forms]![from_lista_De_atualizacao]![txt_lista_de_usuario_para_atualizar].[Text] & "*")


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Folder_announce_new Instruções SQL como utilizar...
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2166
    Registrado : 23/01/2018

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  crysostomo 17/9/2021, 13:59

    Bom dia, obg JP,desculpe-me, mas uma coisa muito simples que não consigo entender no momento no meio ao trabalho, é que a lista fica em branco só aparece quando digita


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  Avelino Sampaio 17/9/2021, 14:20

    Crysostomo

    veja neste meu artigo:

    (copie e cole o endereço abaixo no seu navegador)
    usandoaccess.com.br/dicas/filtrar-independente-acentuacoes-access.asp

    Sucesso!



    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso irrestrito ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 75%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2166
    Registrado : 23/01/2018

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  crysostomo 17/9/2021, 14:38

    Bom dia colegas obrigado.
    Tinha um simples problema em reparar no código
    que era colocar aspas no lugar errado.
    Like "*" & TodosAcentos([Forms]![from_lista_De_atualizacao]![txt_lista_de_usuario_para_atualizar].[Text])& "*"
    Like "*" & TodosAcentos([Forms]![from_lista_De_atualizacao]![txt_lista_de_usuario_para_atualizar].[Text] & "*")


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10765
    Registrado : 04/11/2009

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Empty Re: [Resolvido]Tirar todo acento que ja tem nos registros da tabela

    Mensagem  JPaulo 17/9/2021, 16:45

    Fico feliz por ter resolvido por aqui mesmo, sem necessidade de ir para fora do site.

    Obrigado pelo retorno o site agradece.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Tirar todo acento que ja tem nos registros da tabela Folder_announce_new Instruções SQL como utilizar...

      Data/hora atual: 24/9/2022, 21:07