MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Procura formulário atualização 1 letra

    Compartilhe

    artifact
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 11/06/2013

    Procura formulário atualização 1 letra

    Mensagem  artifact em 30/11/2018, 12:58

    Bom dia

    Estou com um erro na pesquisa de caixa de texto em um formulário, ao usar o filtro em VBA está atualizando e aceitando apenas uma letra no campo

    Queria apenas que ao digitar automaticamente pesquisa conforme for escrevendo

    Ficaria muito grato se alguem puder verificar o que há de errado

    É um banco de dados que apenas fiz as estruturas das tabelas, e estou começando a ajustar a programação, nunca mexi com acess, mas parece ser muito fácil, somente n entendi o erro que está dando

    Segue em anexo o modelo do banco de dados

    Obrigado

    *OBS: está no formulário fContato, que carregas dadados da consulta qContatoTodos que obtem dados da tabela tCliente e tContato

    Código pesquisa:

    Código:
    Private Sub cxPesquisar_Change()
    Me.Filter = "nome like '*" & Me.cxPesquisar.Text & "*'"
    Me.FilterOn = True

    Dim filtro As String
    If Len(Me.cxPesquisar.Text & "") = 0 Then
        Me.Form.Filter = ""
        Me.Form.FilterOn = False
        Exit Sub
    Else
    filtro = "[nome] like '*" & Me.cxPesquisar.Text & "*'"
    Me.Form.Filter = filtro
    Me.Form.FilterOn = True
    End If
    End Sub
    Anexos
    modelo.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (391 Kb) Baixado 9 vez(es)
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7058
    Registrado : 05/11/2009

    Re: Procura formulário atualização 1 letra

    Mensagem  Alexandre Neves em 1/12/2018, 11:42

    Bom dia
    Está a seleccionar o campo inteiro porque assim está escolhido nas opções do Access
    Para alterar vá a Ficheiro > Opções > Definições do Cliente > Comportamento ao entrar no campo e mude a escolha


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

      Data/hora atual: 18/1/2019, 00:05