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

4 participantes

    [Resolvido]Ignorar Acento na ComboBox

    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 20/4/2022, 22:56

    Gostaria de saber se alguém pode me ajudar. Preciso saber como fazer para que a pesquisa no ComboBox ignore acentuação. Não queria remover os acentos e sim apenas ignora-los na pesquisa do combobox,
    Obrigado
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3598
    Registrado : 21/11/2016

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  DamascenoJr. 21/4/2022, 00:57

    Tópico retirado das salas de repositórios.

    Vic Manson Rossi, seja bem vindo ao fórum. Veja abaixo um link com boas dicas do fórum
    https://www.maximoaccess.com/t39851-melhores-macetes-do-maximoaccess

    Aguarde um pouco que certamente algum membro tem a resposta certa para sua questão. Enquanto isso, já usou a ferramenta de busca do fórum?


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Vic Manson Rossi gosta desta mensagem

    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 21/4/2022, 09:44

    Na Busca encontrei varios exemplos muito uteis, tenho aprendido muito aqui, não somente na duvida atual. Encontrei bastante exemplo que fala sobre remover acentos e bastante sobre pesquisar em varias colunas em listbox, mas sobre ignorar acentos em combobox não encontrei.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  JPaulo 21/4/2022, 10:40

    Será isto que pretende ?
    Anexos
    [Resolvido]Ignorar Acento na ComboBox AttachmentVIC MANSON ROSSI.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (37 Kb) Baixado 7 vez(es)


    .................................................................................
    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]Ignorar Acento na ComboBox Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Ignorar Acento na ComboBox Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Ignorar Acento na ComboBox Folder_announce_new Instruções SQL como utilizar...

    Vic Manson Rossi gosta desta mensagem

    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 21/4/2022, 16:36

    Boa tarde, JPaulo

    Obrigado pelo exemplo, mas infelismente não funcionou. Exemplificando melhor o que eu gostaria, tenho um combobox alimentado por uma consulta de cidade concatenado com estado, quando vou fazer a busca exemplo (São Paulo, São Carlos) ou digitar a letra com acento no caso (ã) a lista de pesquisa volta la para a primeira cidade
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  JPaulo 22/4/2022, 05:43

    Quer anexar aqui parte do seu banco para analise e ajuda ?
    Assim é dificil ajudar.


    .................................................................................
    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]Ignorar Acento na ComboBox Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Ignorar Acento na ComboBox Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Ignorar Acento na ComboBox Folder_announce_new Instruções SQL como utilizar...

    Vic Manson Rossi gosta desta mensagem

    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 23/4/2022, 11:43

    Bom Dia,

    No Exemplo a seguir tenho o formulário FormCadastroDeEmpresas, onde tem um ComboBox CidadeUF. Esse ComboBox é alimentado por uma consulta ConsComBoxCidadeUF. Ele exibe na pesquisa, exibe no formulário e grava na tabela, tudo com acento e em maiúsculo. Ao duplo click, se estiver vázio ele abre o formulário FormCadastroDeCidadeUF em modo de adição ou se tiver preenchido ele abre a cidade que esta em modo edição, até aqui tudo perfeito.
    O Problema é que ao execultar a pesquisa, como exemplo São Paulo, ao digitar (Sao) a lista de pesquisa volta para a primeira cidade, como se não tivesse São Paulo na Lista.
    O que eu gostaria é que ele não considere o acento.
    Anexos
    [Resolvido]Ignorar Acento na ComboBox AttachmentExemplo.Vic.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (171 Kb) Baixado 2 vez(es)
    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 23/4/2022, 13:15

    Neste exemplo, eu consegui fazer ignorar os acentos, mas perdi a função duplo click quando o campo esta preenchido onde deveria abrir o formulário de cadastro de cidade em modo editar.
    Obs: O módulo ModAcento não é de autoria minha e também não sei de quem é.
    Anexos
    [Resolvido]Ignorar Acento na ComboBox AttachmentExemplo.Vic2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (166 Kb) Baixado 1 vez(es)
    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 23/4/2022, 13:24

    Neste exemplo, funciona tudo, só que no formulário ele mostra a cidade sem acento, não fica apresentavél
    Anexos
    [Resolvido]Ignorar Acento na ComboBox AttachmentExemplo.Vic3.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (166 Kb) Baixado 1 vez(es)
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  ahteixeira 23/4/2022, 16:10

    Olá a todos,

    Vic Rossi, estive analisar o seu exemplo da mensagem nr 7 e na minha opinião não consegue ter as duas opções numa combo.
    Ou seja procurar com e sem acentuação, no entanto veja o que fiz se ajuda:
    cld.pt/dl/download/c3906cdd-690c-467e-b993-818386a67998/Exemplo.Vic_StrConv.zip
    Copiar link acima e colar no navegador

    Por vezes devemos mudar o problema ou como costumo dizer "mudar a abordagem", estou a fazer um exemplo de como poderia ser uma solução.

    Aproveito para informar que a modelagem da base de dados não é a mais correta, pois se tem uma tabela de cidades na empresa apenas devia ter o numero do registo, assim é que é uma base de dados relacionada, mas não vamos fugir do tema.

    Abraço
    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 23/4/2022, 16:32

    Boa Tarde, Ahteixeira

    Obrigado pelo seu exemplo, mas desta forma que fez é a que fiz que perde a função de duplo click
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  ahteixeira 23/4/2022, 17:30

    Olá Vic Rossi,

    Alterei o nome da combo para não existir conflito com origem dos dados, deve ajustar o seu codigo
    [Resolvido]Ignorar Acento na ComboBox 0202

    No entanto, não creio que esta seja a melhor solução, já iniciei exemplo, mas não acabei, vou mostrar outra forma de fazer o que pretende.
    Abraço

    Vic Manson Rossi gosta desta mensagem

    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 23/4/2022, 17:59

    Muito Obrigado, fico no aguardo

    Fiz conforme seu exemplo mas mesmo assim o duplo click com o combo preenchido não funciona. pelo fato de alterar o campo Me.CidadeUF_frm = Me.CidadeUF_frm.Colunm(2) na hora do duplo click ele deixa de ter a Colunm(0) que seria o IDCidade
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  ahteixeira 23/4/2022, 19:50

    Olá Vic Rossi,

    A modelagem de dados a a consulta de junção da cidade com o estado não ajuda, mas consegue-se resolver com o DLookup, veja se é isto:
    cld.pt/dl/download/106630b6-7841-472a-928e-aad76d350df4/Exemplo.Vic_StrConv_rev.zip

    Se tiver oportunidade, vou demonstrar de outra forma para obter o que pretende.

    Abraço

    Vic Manson Rossi gosta desta mensagem

    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  ahteixeira 23/4/2022, 21:25

    Olá Vic Rossi,

    A outra forma que permite pesquisar com e sem acentuação foi através de uma caixa de listagem que filtra ao escrever numa caixa de texto, veja o código:
    Código:
    Private Sub txtFiltro_Change()
    'ahteixeira 2022
    'filtro ignora acentuacao
        Dim strSQL As String
        strSQL = "SELECT * FROM qyrCidadeUF WHERE SemAcentos Like '" & StrConv(Me.txtFiltro.Text, 2, 1049) & "*'"
        Me.Lista.RowSource = strSQL
    End Sub

    Adaptei um exemplo ao seu formulario para demonstrar outra forma de obter o mesmo resultado:
    cld.pt/dl/download/db740209-4d00-4bcc-a925-4ad139194242/frmSelect_PesquisaIgnoraAcentuacao.zip

    Abraço a todos
    Anexos
    [Resolvido]Ignorar Acento na ComboBox AttachmentfrmSelect_PesquisaIgnoraAcentuacao.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (130 Kb) Baixado 5 vez(es)

    Vic Manson Rossi gosta desta mensagem

    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 24/4/2022, 10:19

    Bom dia, ahteixeira,

    Perfeito, no exemplo que me fez resolveu exatamente como eu queria, fiz apenas alguns ajuste para mostrar na lista de pesaquisa também com acento, coisa mínima, sou totalmente iniciante no Access e esta não é minha profissão, estou apenas criando um banco de dados para Meu uso pessoal, tenho aprendido bastante aqui e você me ajudou muito,

    Obrigado a Você e a todos do Forum

    Segue axeno do exemplo final
    Anexos
    [Resolvido]Ignorar Acento na ComboBox AttachmentExemplo.Vic_StrConv_rev2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (150 Kb) Baixado 3 vez(es)
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  ahteixeira 24/4/2022, 11:37

    Olá Vic Manson Rossi,

    Ficamos felizes por ajudar, obrigado pelo retorno, o fórum agradece.
    Está no fórum certo para aprender Wink

    No seu exemplo não pesquisa com acentuação, teste "são paulo".
    O exemplo nr. 15 resolve o problema com "outra abordagem"

    Sumula, até à data desconheço como pesquisar com e sem acentuação numa combobox.

    Abraço a todos
    avatar
    Vic Manson Rossi
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 11/02/2022

    [Resolvido]Ignorar Acento na ComboBox Empty Re: [Resolvido]Ignorar Acento na ComboBox

    Mensagem  Vic Manson Rossi 24/4/2022, 12:32

    Entendi, realmente se digitar São Paulo com acento não pesquisa, mas da forma que você fez me atendeu 100%, na hora da pesquisa não digito o acento este era o meu problema, mas mesmo assim vou ver como fica com o exemplo nr 15, só não sei onde ele fica

      Data/hora atual: 18/5/2022, 20:13