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

    Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Compartilhe
    avatar
    magalhaesro1979
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 15/05/2014

    Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  magalhaesro1979 em 30/10/2018, 12:55

    Bom dia, tenho uma tabela que tem os seguintes campos: CNAE e OCUPACAO.

    Tenho das combo box, um com os CNAE´S  e outra com as OCUPAÇÕES, o que não estou conseguindo fazer é, ao selecionar um CNAE NA 1ª combo box , ele já direcione para a 2ª combo box e de foco na OCUPAÇÃO correspondente ao CNAE escolhido.

    eu consegui preencher as combo box com as informações que quero, porem não consigo fazer o direcionamento para a informação escolhida.

    coloquei seguinte código abaixo, ele direciona para o campo, porém não relacionaas informações.

    Private Sub cbocnae_AfterUpdate()

    cboocupacao.SetFocus
    cboocupacao.RowSource = "select tbOcupacoes.CNAE FROM tbOcupacoes where tbOcupacos.OCUPACAO"
    cboocupacao.Requery

    End Sub

    peço ajuda para solucionar este problema.
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2637
    Registrado : 21/04/2011

    Re: Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  Marcelo David em 30/10/2018, 12:59

    Bom dia,

    em: where tbOcupacos.OCUPACAO, não foi informado o criterio de relação.
    Pois deveria ser algo do tipo:  where tbOcupacos.OCUPACAO = SeuCritério.


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    magalhaesro1979
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 15/05/2014

    Re: Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  magalhaesro1979 em 30/10/2018, 13:20

    entendi, mas poderia me ajudar na montagem do critério?
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2637
    Registrado : 21/04/2011

    Re: Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  Marcelo David em 30/10/2018, 14:08

    O campo OCUPACAO, na tabela, precisa ter qual informação para ser incluída no critério? E qual é o tipo de dados do campo OCUPACAO?


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    magalhaesro1979
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 15/05/2014

    Re: Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  magalhaesro1979 em 30/10/2018, 14:25

    Amigo, não estou conseguindo compreender bem, mas postei uma foto da tabela para que me ajude a montar a consulta.
    Anexos
    tela.jpg
    Você não tem permissão para fazer download dos arquivos anexados.
    (78 Kb) Baixado 6 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2637
    Registrado : 21/04/2011

    Re: Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  Marcelo David em 30/10/2018, 14:31

    Para facilitar, poste o banco, caso seja possível.


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    magalhaesro1979
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 15/05/2014

    Re: Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  magalhaesro1979 em 30/10/2018, 14:35

    segue imagem do banco.
    Anexos
    Sem título.jpg
    Você não tem permissão para fazer download dos arquivos anexados.
    (41 Kb) Baixado 5 vez(es)
    avatar
    magalhaesro1979
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 7
    Registrado : 15/05/2014

    Re: Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  magalhaesro1979 em 30/10/2018, 14:36

    segue outra imagem do banco
    Anexos
    tela.jpg
    Você não tem permissão para fazer download dos arquivos anexados.
    (78 Kb) Baixado 3 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2637
    Registrado : 21/04/2011

    Re: Preencher combo box conforme dados escolhidos em uma tabela, indicando o informação referente

    Mensagem  Marcelo David em 30/10/2018, 14:47

    Tente assim:

    cboocupacao.RowSource = "select CNAE FROM tbOcupacoes where OCUPACAO='"& me.SuaCombo1 &"'"


    se não der, poste o aplicativo se for possível.


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)

      Data/hora atual: 26/3/2019, 02:57