[Resolvido]retornar menor preço

boa tarde!

estou com um problema novamente.

tenho uma tabela de produtos alimentada por um formulário.
na tabela tenho o campo codProduto, Produto, Fornecedor, Fabricante e PreçoUnit
pois bem, tenho 3 produtos iguais porém com códigos diferentes, pois cada um pertence a um(1) fornecedor.
preciso ao clicar no listbox me retorne o Preço Unitário de cada fornecedor com o mesmo produto e em seguida retornar o fornecedor com o
menor preço.
è possível?

Desde já agradeço!

Olá Raigley,

Crie uma consulta, edite no modo SQL ,cole a instrução abaixo e teste:

Código:

SELECT Produtos.Produto, First(Produtos.Fabricante) AS PrimeiroDeFabricante, First(Produtos.Fornecedor) AS PrimeiroDeFornecedor, Min(Produtos.PrecoUnit) AS MinDePrecoUnit FROM Produtos GROUP BY Produtos.Produto;


Nota, está a fazer o agrupamento pela descrição, se algum produto for criado com a descrição mal não vai funcionar.
O ideal era você ter um campo tipo "codProdutoUnico" em que era repetido nos produtos iguais de vários fornecedores.

Abraço

Alvaro, eu já havia pensado nisso. Observe que o formulario possui campos para o resultado.

Olá Emerson Laranjo,

Será adicionar no fim do código do evento lstProduto_Click()

Código:

txtPrecoMin = DMin("[PrecoUnit]", "Produtos", "[Produto] = '" & Me.lstProduto.Column(1) & "'")
txtFornEnc = DLookup("[Fornecedor]", "Produtos", "[Produto] = '" & Me.lstProduto.Column(1) & "' AND [PrecoUnit] = " & Replace(CCur(txtPrecoMin), ",", "."))

Ficamos aguardar retorno do colega.
Abraço a todos

Alvaro, aqui funcionou perfeitamente, entao ficamos no aguardo do amigo.

Boa tarde!

galera, muito obrigado pela atenção de vocês!

funcionou perfeitamente, tanto a consulta no modo sql quanto o código no evento click da caixa de listagem.
agora vou seguir o conselho e fazer com um código único para cada produto.


resolvidíssimo.

assim que terminar posto o bd finalizado.

abraço!

Olá a todos,
Raigley, obrigado pelo retorno, o fórum agradece.
Abraço