[Resolvido]Caixa de Listagem com condição e duas tabelas

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

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

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

Ate mais

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!

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

Aguardamos...

Bom dia DamascenoJr., deu tudo certo sim, muito obrigado e desculpa nao ter dado o devido retorno à época.