Cálculos em formulário Access

Boa tarde,

Como posso criar um formulário que calcule % de descontos a cada 3 unidades. Exemplo: De 1 à 2 unidades não aplicar desconto, quando tiver 3 unidades calcular 10% de desconto e quando for de 4 à 5 não aplicar desconto, apenas manter o desconto das 3 unidades e quando tiver 6 unidades aplicar desconto.

1 x 10,00 = 10,00
1x 10,00 = 10,00
1x 10,00 = 10,00
1x 10,00 = 10,00
1x 10,00 = 10,00
1x 10,00 = 10,00

Total unidades = 6
Sub-total = 60,00
Desconto = 6,00
Total = 54,00

Se fosse 2 unidades o total = 20,00
Se fosse 3 unidades o total = 27,00
Se fosse 4 unidades o total = 37,00
Se fosse 5 unidades o total = 47,00
Se fosse 6 unidades o total = 54,00

Ou seja, a cada 3 unidades aplicar desconto.

Espero ter detalhado o que preciso.

Encontrei um link que tem algo parecido ao que preciso, só não sei como adaptar ao formulário que preciso:

https://share.linx.com.br/plugins/servlet/mobile?contentId=27117657#content/view/27117657


Grato,

Eduardo

Boa tarde,

Posta a sua estrutura assim fica mais fácil de te ajudar.
Pelo que eu entendi o desconto vai ser feito em varias unidades do mesmo item ou o desconto vai ser quando der 6 itens no pedido?
Se você tiver já um esboço posso tentar te ajudar!

Olá,

Esse desconto será sobre o total de itens do pedido, não pelo produto.

A idéia é de conceder desconto de 10% somente quando a quantidade total do pedido for de 3, 6, 9, etc

A cada 3 quantidades, se for 1 ou 2 sem desconto, se for 4 à 5 sem desconto e assim por diante.

Vou anexar o BD

Grato,

Eduardo

Olá

Boa tarde,

Achei um exemplo aqui neste post
https://www.maximoaccess.com/t18347-resolvidofuncao-desconto

Ai adaptei um campo com o total dos produtos, infelizmente ainda não consegui fazer com que o desconto seja feito automático.
Mas uma pergunta não vai ficar estranho você dando descontos de 3 em 3 produtos?
Acho melhor usar o campo desconto do formulário, mesmo por que sua margem de lucro de cada produto não e igual para todos ou é?
O exemplo abaixo e da autoria do usuário "rdrck" simplesmente inseri um campo com a contagem dos produtos.
Espero ter ajudado

Ok meu amigo, vou dar uma olhada. Na verdade eu monto algumas aplicações em Access e Excel, à pedido de um amigo e sempre o ajudo e esse tipo de cálculo é estranho, achei isso também, seria melhor descontos viáveis, mas como diz o ditado: o cliente sempre tem razão. Mesmo assim, vou adequar o BD para as finalidades dele.

Te retomo para dar como encerrado o tópico.

Valeu.

Eduardo

Olá..

No evento após atualizar do campo quantidade
Será calculado 10 % de desconto a todos as quantidades multiplos de 3

Código:

Private Sub Texto53_AfterUpdate()
Dim qteCalculo As Double

If Me.Quantidade >= 3 Then
    qteCalculo = (Int(Me.Quantidade / 3)) * 3
    Me.Desconto = (((Me.Unitário * qteCalculo) / 100) * 10)
Else
    Me.Desconto = 0
End If

Me.Requery
End Sub

Faça teste e retorne

Aguardamos

Abraços e sucesso

Olá..

Continuamos aguardando o seu retorno.

Se estiver Resolvido, Finalize o tópico. Isto é importante para deixar o Fórum organizado.

Aguardamos

Abraços e sucesso