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


    Combo OPM e Municipios

    Pablo Weber
    Pablo Weber
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 177
    Registrado : 22/11/2010

    Combo OPM e Municipios Empty Combo OPM e Municipios

    Mensagem  Pablo Weber em 25/3/2020, 19:52

    Boa tarde pessoal, tudo tranquilo?

    Gostaria de saber se alguém pode me ajudar em um problema.
    Estou montando uma base de dados, onde possuo duas tabelas (OPM e Municipios)
    Estou quebrando a cabeça para fazer com que as combos trabalhem certinhas, por exemplo, quando eu seleciono uma OPM, na outra combo deve aparecer os municípios referente aquela combo selecionada. Já vi alguns exemplos aqui, mas confesso que ainda não entendi.
    Já fiz várias mudanças, na origem da linha, no SQL, mas ainda não deu.
    Será que alguém pode me ajudar nisso?
    Talvez seja algum item que não estou setando.

    Mais uma vez obrigado pelo espaço.
    Anexos
    Combo OPM e Municipios AttachmentOP. GOLFINHO.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (141 Kb) Baixado 4 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Combo OPM e Municipios Empty Re: Combo OPM e Municipios

    Mensagem  Alexandre Neves em 25/3/2020, 20:38

    Boa noite
    Aos anos que anda no fórum, já abordámos muitas vezes estes assuntos
    Nomeie de forma normalizada e campos com tipo de dados adequados ao dados que vai guardar

    No acontecimento depois de actualizar do opm_ocorrencia, coloque
    Código:
    Private Sub opm_ocorrencia_AfterUpdate()
        municipio_ocorrencia.RowSource = "SELECT municipio, cod_municipio, cod_opm FROM tbl_municipio WHERE cod_opm='" & opm_ocorrencia.Column(0) & "'"
    Me.municipio_ocorrencia.SetFocus
    Me.municipio_ocorrencia.Dropdown
       
    End Sub

    Agora adapte as colunas da segunda caixa de combinação
    Vá acompanhando o fórum. Evolui e poderá ajudar começando em situações elementares


    .................................................................................
    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: 2/4/2020, 05:33