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]Caixa de Listagem com Filtro em Formulário

    avatar
    HenriqueOliveira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 04/10/2011

    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Caixa de Listagem com Filtro em Formulário

    Mensagem  HenriqueOliveira 11/11/2011, 13:57

    Bom dia aos amigos do fórum,
    tenho um formulário Detalhes do Cliente (aquele que vem de exemplo) e gostaria de criar uma nova aba nesse formulário com uma caixa de listagem filtrada de uma tabela de orcamentos.
    Basicamente isso que queria: Ao abrir um registro de um cliente X no formulário Detalhes do Cliente, gostaria que na caixa de listagem da outra aba apenas os orçamentos com o nome do mesmo cliente X fosse exibido e não todos os registros da tabela.
    Como posso fazer isso?
    estou anexando arquivos para ficar mais claro o que gostaria..

    Agradeço a atenção.


    .................................................................................
    Henrique Oliveira lol!
    avatar
    HenriqueOliveira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 04/10/2011

    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  HenriqueOliveira 11/11/2011, 13:59

    Imagem da aba que gostaria de por a caixa de listagem..

    Obrigado.


    .................................................................................
    Henrique Oliveira lol!
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  Dilson 11/11/2011, 15:09

    Olá Henrique,

    Crie uma consulta, no critério da chave estrangeira coloque: Como [Formulários]![SeuForm]![SuaCaixaQueTemOCódigoDoCliente] & "*"

    Crie na aba uma ListBox com esta consulta.

    Toda vez que ela abrir filtrará apenas os registros pertinentes ao código do cliente.
    avatar
    HenriqueOliveira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 04/10/2011

    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  HenriqueOliveira 16/11/2011, 11:18

    ele filtra apenas valores de um clienteX e quando seleciono outro registro de um clienteY a listbox não altera.. permanece no mesmo filtro do clienteX. como posso arrumar isso?

    agradeco a ajuda


    .................................................................................
    Henrique Oliveira lol!
    avatar
    Convidado
    Convidado


    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  Convidado 16/11/2011, 11:32

    No evento apos atualizar da combo onde seleciona o cliente
    Me.sualist.requery
    avatar
    HenriqueOliveira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 04/10/2011

    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  HenriqueOliveira 16/11/2011, 11:41

    não funcionou.. poderia explicar melhor?


    .................................................................................
    Henrique Oliveira lol!
    avatar
    Convidado
    Convidado


    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  Convidado 16/11/2011, 11:49

    Voce colocou a lista com o criterio enviado pelo amigo dilson correto? Pois bem quando a lista fica filtrada mostrndo os dados do cliente x apos escolher outro cliente voce tem que aplicar um requerey na list.. o requery e como se enviasse um comando para a list atualuzar novamente, como o cliente nao sera mais o x, ela atualizara filstrando pelo novo cliente...

    Voce seleciona o cliente emuma combo correto? Pois bem na aba propriedades no evento apos atualizarr aplique o comando logicamente aplicando o nome da sualist


    Me.nomedasuallist.requery
    avatar
    Convidado
    Convidado


    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  Convidado 16/11/2011, 11:54

    Um problema que tera ai e que esta usando um template do acess, e ele utiliza macro na combo para localizar o registr coincidente com o controle... para utilizar o comando que te falei teria que excluir a macro e aplicatr todos os codios em vba... poderia fazer isto pra ti mas estou em um tablet, portanto sem o access...
    avatar
    HenriqueOliveira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 04/10/2011

    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  HenriqueOliveira 16/11/2011, 13:09

    Agora eu entendi bem, o problema justamente é que tenho uma macro no evento após atualizar da cbo... mas vou ver o que consigo fazer aqui


    .................................................................................
    Henrique Oliveira lol!
    avatar
    Convidado
    Convidado


    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  Convidado 16/11/2011, 14:26

    O codigo para isto sera assim:


    Private Sub ComboBusca_AfterUpdate()
    Me.RecordsetClone.FindFirst "suatabela.codigo = " & Me.Combobusca.Column(1)
    If Me.RecordsetClone.NoMatch Then
    Msgbox "No entry found"
    Else
    Me.Bookmark = Me.RecordsetClone.Bookmark
    Me.sua list.requery
    End If
    End Sub


    Tensque ver na combo se o codigo da chave primaria da tabela esta na coluna 0 ou 1.. se estiver na primeira coluna da tabela carregada na combo coloque 0



    Cumprimentos
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  vieirasoft 27/11/2011, 20:26

    Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.
    Caio
    Caio
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 301
    Registrado : 27/04/2015

    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  Caio 29/8/2016, 20:35

    Não conseguiu pois no final dos critérios da consulta devia conter o .[text] & "*"

    Conteúdo patrocinado


    [Resolvido]Caixa de Listagem com Filtro em Formulário Empty Re: [Resolvido]Caixa de Listagem com Filtro em Formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/4/2024, 10:45