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

    Caixa de Listagem com condição e duas tabelas

    avatar
    wmantovani
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 164
    Registrado : 06/09/2011

    Caixa de Listagem com condição e duas tabelas Empty Caixa de Listagem com condição e duas tabelas

    Mensagem  wmantovani 7/4/2017, 14:39

    Tenho uma caixa de listagem em um formulário que dependendo de uma opção na caixa de texto deve listar uma ou outra tabela, mas não sei como montar isso em vba e em qual condição, antes de atualizar, ao receber o foco...

    se a caixa de texto for "perda" o valores da listbox dever pesquisar (coloquei em Sql) pq não sei como colocar em vba

    SELECT tblEntradadeEspecies.ESPECIE, Sum(tblEntradadeEspecies.QUANTIDADE) AS SomaDeQUANTIDADE
    FROM tblEntradadeEspecies
    GROUP BY tblEntradadeEspecies.ESPECIE
    HAVING (((Sum(tblEntradadeEspecies.QUANTIDADE))>0))
    ORDER BY tblEntradadeEspecies.ESPECIE;


    se for qualquer outro valor na textbox

    SELECT tblEspecies.Nome_popular
    FROM tblEspecies
    GROUP BY tblEspecies.Nome_popular
    ORDER BY tblEspecies.Nome_popular;

    sei q vou ter que usar if me......then

    obrigado

    scandinavo
    scandinavo
    Super Avançado
    Super Avançado

    Respeito às regras : Respeito às Regras 100%

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

    Caixa de Listagem com condição e duas tabelas Empty Re: Caixa de Listagem com condição e duas tabelas

    Mensagem  scandinavo 9/4/2017, 23:10

    Vai ter que ser em VBA e usar a função IF

    Poste o banco de dados vai ser mais façil.

    Ate mais
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    Caixa de Listagem com condição e duas tabelas Empty Re: Caixa de Listagem com condição e duas tabelas

    Mensagem  FabioPaes 10/4/2017, 18:47

    Ola, nesse caso basta utilizar a propriedade da caixa de listagem chamada .RowSorce para realizar o preenchimento de Caixa de listagem, Caixa de combinação e Formulários.

    Ex: No evento apos atualizar dessa sua caixa de texto (Recomendo que seja Caixa de Combinação) coloque:

    If Me.NomeCaixaTexto = "PERDA" Then

    Me.NomeCaixaListagem.RowSorce = "SELECT tblEntradadeEspecies.ESPECIE, Sum(tblEntradadeEspecies.QUANTIDADE) AS SomaDeQUANTIDADE FROM tblEntradadeEspecies GROUP BY tblEntradadeEspecies.ESPECIE HAVING (((Sum(tblEntradadeEspecies.QUANTIDADE))>0)) ORDER BY tblEntradadeEspecies.ESPECIE;"

    else

    Me.NomeCaixaListagem.RowSorce ="SELECT tblEspecies.Nome_popular FROM tblEspecies GROUP BY tblEspecies.Nome_popular ORDER BY tblEspecies.Nome_popular;"
    end if


    Observe que a propriedade .RowSorce vc informa como valor uma consulta SQL!


    .................................................................................
    _____________________________________________________________________
    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!
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3130
    Registrado : 22/11/2016

    Caixa de Listagem com condição e duas tabelas Empty Re: Caixa de Listagem com condição e duas tabelas

    Mensagem  DamascenoJr. 30/9/2021, 00:22

    wmantovani, algum avanço? Não esqueça de dar retorno para os colegas que tentam ajudar.

    Aguardamos...


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

      Data/hora atual: 16/10/2021, 21:52