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

    [Resolvido]Filtro em caixa de combinação

    Compartilhe

    Arouca
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 17/01/2017

    [Resolvido]Filtro em caixa de combinação

    Mensagem  Arouca em Seg 21 Ago 2017, 21:07

    Boa tarde.

    Estou tendo dificuldade em encontrar o erro na lógica para filtrar duas caixas de combinação. No arquivo que segue está uma parte do BD, na qual estou querendo:
    1. Quando escolha a opção da Marca, ele filtre os equipamentos relacionados a marca e que atualize caso mude a opção marca.
    2. nas reticências eu consigo ver a lista atualizada das marcas cadastradas bem como posso adicionar novas. Isso também para o equipamento, no qual quando vou adicionar uma nova, tenho que escolher obrigatoriamente a marca para que então este seja vinculado a mesma. Porém nao estou conseguindo realizar este feito. Crying or Very sad

    Agradeço desde já quem puder ajudar. Obrigado.
    Anexos
    Equip.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (81 Kb) Baixado 7 vez(es)
    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1043
    Registrado : 05/02/2010

    Filtro em caixa de combinação

    Mensagem  good guy em Seg 21 Ago 2017, 22:05

    Olá Arouca,

    Tente fazendo algo assim:

    Código:
    Private Sub cboMarca_AfterUpdate()
    Dim intCod As Integer
    Dim strMarca As String

    strMarca = Me.cbomarca.Column(1)

    intCod = Nz(DLookup("Cod_Mar", "tbl_Marca", "Marca = '" & strMarca & "'"))
    Me.txt_equip.RowSource = "SELECT [Tbl_Equipamento].[Equipamento] FROM Tbl_Equipamento WHERE [Tbl_Equipamento].[Cod_mar] = " & intCod

    End Sub

    Arouca
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 17/01/2017

    Re: Filtro em caixa de combinação

    Mensagem  Arouca em Ter 22 Ago 2017, 13:18

    realmente não está filtrando como deveria, até organizei as tabelas. Sou principiante ainda em access, as vezes nao encontro a lógica correta Neutral  
    Na verdade imagino que esteja faltando ele atualizar logo apos a inserção do valor da caixa de combinação, para que possa filtrar os valores.
    Estou enviando o BD atualizado
    Anexos
    Equip.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (163 Kb) Baixado 2 vez(es)
    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1043
    Registrado : 05/02/2010

    Filtro em caixa de combinação

    Mensagem  good guy em Ter 22 Ago 2017, 14:37

    Olá Arouca,

    Veja se te atende,
    Anexos
    Equip.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (161 Kb) Baixado 10 vez(es)
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 710
    Registrado : 01/03/2014

    Re: [Resolvido]Filtro em caixa de combinação

    Mensagem  Celso Roberto em Ter 22 Ago 2017, 15:18

    Olá...

    Desculpe good guy, como eu já tinha feito resolvi mandar

    pode ser assim também

    Abraços
    Anexos
    Equip.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (105 Kb) Baixado 25 vez(es)


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

    Arouca
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 17/01/2017

    Re: [Resolvido]Filtro em caixa de combinação

    Mensagem  Arouca em Ter 22 Ago 2017, 16:33

    Era isso mesmo Pessoal! Pelo que deu para perceber era um relação com a tabela e a atualização da caixa do equipamento!!!Agradeço imensamente por ter visto e pela ajuda !! Very Happy
    avatar
    Celso Roberto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 710
    Registrado : 01/03/2014

    Re: [Resolvido]Filtro em caixa de combinação

    Mensagem  Celso Roberto em Ter 22 Ago 2017, 22:29

    Olá..

    O Fórum agradece seu retorno

    Abraços


    .................................................................................
    Quando sua dúvida estiver resolvida, Agradeça ao Fórum e de seu tópico por Resolvido



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....

      Data/hora atual: Ter 21 Nov 2017, 19:17