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


2 participantes

    [Resolvido]Filtro em branco

    maguim
    maguim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 449
    Registrado : 15/05/2013

    [Resolvido]Filtro em branco Empty [Resolvido]Filtro em branco

    Mensagem  maguim 24/7/2017, 20:09

    amigos uma duvida, não encontrei nada no fórum

    gostaria de saber se poderia colocar um limpar filtro pra deixa em "branco o subform"

    exemplo:

    pesquisei o que queria e apertei limpar o filtro, ai ele me aparece todos os dados do filtro.


    gostaria de vez aparecer todos os dados do filtro no formulário que fica-se somente sub em branco... com se tivesse achado nada na consulta!


    abraços


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  FabioPaes 24/7/2017, 20:57

    Varias forma de fazer isso amigo... Temos que saber como aplica esses filtros...

    Pode por exemplo, aplicar um filtro Nulo no Sub.

    Ex:

    Me.NomeSubForm.Form.Filter="ID=0"
    Me.NomeSubForm.Form.Filteron=True


    Última edição por FabioPaes em 25/7/2017, 14:43, editado 1 vez(es)


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    maguim
    maguim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 449
    Registrado : 15/05/2013

    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  maguim 25/7/2017, 12:31

    nao consegui nenhum desses exemplos =/


    segue o codigo abaixo que esta no botao limpar

    Me.txt_PesquisaNome.SetFocus
    Me.txt_PesquisaNome.Text = ""


    Me.subfrmPesquisaClientes.Form.RecordSource = "SELECT BANCO_DE_DADOS_CENTRAL.*" & _
                                                 " FROM BANCO_DE_DADOS_CENTRAL ORDER BY BANCO_DE_DADOS_CENTRAL.COD_PASTA; "


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  FabioPaes 25/7/2017, 13:32

    Então, posta aqui esse exemplo pra dar uma olhada favor!


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    maguim
    maguim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 449
    Registrado : 15/05/2013

    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  maguim 25/7/2017, 14:18

    FabioPaes


    segue



    abraço


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  FabioPaes 25/7/2017, 14:41

    No Botão de Limpar coloque:

    Código:
    Private Sub cmdLimpar_Click()
    Me.txt_PesquisaNome.SetFocus
    Me.txt_PesquisaNome.Text = ""

    Me.subfrmPesquisaClientes.Form.Filter = "NOME='000'"
    Me.subfrmPesquisaClientes.Form.FilterOn = True
    End Sub

    No subformulario, na guia Dados>Item: Proteção de Registros, mude para:
    Sem Proteção!


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    maguim
    maguim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 449
    Registrado : 15/05/2013

    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  maguim 25/7/2017, 14:49

    fabio

    mto obg, uma duvida pra que serve esses parametros ?

    Form.Filter

    Form.FilterOn


    abraços


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  FabioPaes 25/7/2017, 17:30

    O parâmetro .Filter (Filtro) eu informo um Filtro para ser aplicado no Formulario.
    .FilterOn (Filtrar Ao ativar/carregar) eu aplico o Filtro informado no comando anterior.

    Veja imagem a baixo:
    [Resolvido]Filtro em branco Sem_ty12
    Os parâmetros passado pelo VB são os mesmos destacados na imagem.

    No seu caso, eu passei um filtro Nulo para mostrar o formulário em branco.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    maguim
    maguim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 449
    Registrado : 15/05/2013

    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  maguim 26/7/2017, 13:02

    obg !

    sempre somando aqui no forum.


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised

    Conteúdo patrocinado


    [Resolvido]Filtro em branco Empty Re: [Resolvido]Filtro em branco

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/4/2024, 03:19