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]Combo box filtrar dados de outra combo box.

    teboman
    teboman
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 03/08/2016

    [Resolvido]Combo box filtrar dados de outra combo box. Empty [Resolvido]Combo box filtrar dados de outra combo box.

    Mensagem  teboman 6/7/2017, 16:16

    Boa tarde pessoal, pode parecer um problema simples para quem entende e eu relmente vi varios topicos semelhantes porém não consegui aplicar no meu. É o seguinte, eu gostaria que ao selecionar o fórum em uma combo box ele me exiba somente as varas disponíveis no respectivo fórum e jogando a localização para o respectivo campo no formulário para eu poder gerar cartas para os clientes. Vou anexar meu BD se alguém puder me dar uma luz eu agradeço desde já.
    Existem poucos foruns cadastrados pois ainda estou montando. No caso só tem o JEF e o Ruy Barbosa com varas e localizações cadastradas. Vide sistema.
    Anexos
    [Resolvido]Combo box filtrar dados de outra combo box. AttachmentAnalizarem.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (29 Kb) Baixado 40 vez(es)


    Última edição por teboman em 12/7/2017, 14:52, editado 1 vez(es)
    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]Combo box filtrar dados de outra combo box. Empty Re: [Resolvido]Combo box filtrar dados de outra combo box.

    Mensagem  FabioPaes 7/7/2017, 13:24

    Olá, vamos começar tentando aplicar o que eu descrevi nesse Topico:
    https://www.maximoaccess.com/t27202-resolvidoerro-4-caixas-de-listagem-sincronizadas

    Caso não consiga avisa que damos sequencia!!!


    .................................................................................
    _____________________________________________________________________
    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!
    teboman
    teboman
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 03/08/2016

    [Resolvido]Combo box filtrar dados de outra combo box. Empty Re: [Resolvido]Combo box filtrar dados de outra combo box.

    Mensagem  teboman 9/7/2017, 18:05

    Muito obrigado pela resposta e desculpe a demora.
    Eu tentei aplicar aqueles codigos nos meus anteriores mas ele ta dando erro de tipo de dados incompatível na expressão de critério.
    Meu codigo ficou da seguinte forma.

    Me.txtvara.RowSource = "SELECT Vara, CdForum, Localizacao FROM Varas " & _
    "WHERE CdForum = " & Me.txtforum.Column(0) & " ORDER BY Localizacao"

    Muito obrigado pela atenção.
    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]Combo box filtrar dados de outra combo box. Empty Re: [Resolvido]Combo box filtrar dados de outra combo box.

    Mensagem  FabioPaes 10/7/2017, 18:17

    Esse erro ocorre quando esta mandado uma valor para comparação diferente do tipo de dados que contem no Campo da tabela. Exe:
    Está informando que o valor é do tipo Numero, mas na tabela o campo é tipo Texto. ou vice versa!

    Verifique se o campo da tabela CdForum realmente é NUMERO e se no Me.txtforum.Column(0) tem realmente o Código que quer informar... Verique a coluna correta, a coluna ZERO.


    .................................................................................
    _____________________________________________________________________
    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!
    teboman
    teboman
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 03/08/2016

    [Resolvido]Combo box filtrar dados de outra combo box. Empty Re: [Resolvido]Combo box filtrar dados de outra combo box.

    Mensagem  teboman 11/7/2017, 15:05

    Poxa cara, muito obrigado pela aula, graças a você deu certo, só tenho mais uma duvida, as varas estão fora de ordem estão bem aleatório eu tentei colocar o ASC no final do order by mas não deu certo, tem alguma diferença?

    Edit: consegui, eu estava colocando order by localização mas tem que ser vara

    Edit 2: Como faço pra sempre que escolher no o campo vara ele atualize o campo localização
    teboman
    teboman
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 49
    Registrado : 03/08/2016

    [Resolvido]Combo box filtrar dados de outra combo box. Empty Re: [Resolvido]Combo box filtrar dados de outra combo box.

    Mensagem  teboman 11/7/2017, 18:27

    Consegui fazer tudo, vou postar meu código caso possa ajudar alguém futuramente.

    Private Sub txtforum_AfterUpdate()
    Me.Requery
    Me.txtEstado.Value = Me.txtforum.Column(5)
    Me.txtEndereco.Value = Me.txtforum.Column(3)
    Me.txtCidade.Value = Me.txtforum.Column(4)
    Me.txtCep.Value = Me.txtforum.Column(6)
    Me.txtvara.RowSource = "SELECT Varas.CdForum, Varas.Vara, Varas.Localizacao FROM Varas " & _
    "WHERE CdForum = " & Me.txtforum.Column(0) & " ORDER BY Vara ASC;"
    Me.txtvara.Value = ""

    Private Sub txtvara_AfterUpdate()
    Me.txtlocalizacao.Value = Me.txtvara.Column(2)
    End Sub


    Muito obrigado pela atenção.

    Conteúdo patrocinado


    [Resolvido]Combo box filtrar dados de outra combo box. Empty Re: [Resolvido]Combo box filtrar dados de outra combo box.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 13:58