[Resolvido]Sistema de Vendas - Regra de Precificação

Bom Dia Pessoal

Estou desenvolvendo um sistema e estou precisando de ajuda.

Estou querendo fazer uma parte de Precificação automática.
Exemplo:

Preço de entrada de R$0,01 a R$20,00 (aumentar 12%)
Preço de entrada de R$20,01 a R$50,00 (aumentar 10%)
Preço de entrada de R$50,00 a R$100,00 (aumentar 7%)
Preço de entrada acima de R$100,01 (aumentar 5%)

Eu queria fazer este campo automático, pois quando inseríssemos o preço de entrada(compra) ele gerasse o preço de venda.

Desde já agradeço a todos.

Olá Deison,

Cole esta função:

Código:

Function fncPrecificacao(nValor As Double)
    Select Case nValor
           Case 0.1 To 20
             fncPrecificacao = nValor + (nValor * 0.12)
           Case 20.1 To 50
             fncPrecificacao = nValor + (nValor * 0.1)
           Case 50.1 To 100
             fncPrecificacao = nValor + (nValor * 0.7)
           Case Else
             fncPrecificacao = nValor + (nValor * 0.5)
     End Select
End Function

No campo Preço de entrada coloque no evento Depois de Actualizar:

PrecoDaVenda = fncPrecificacao(PrecoDaEntrada)

Abraço

Muito Obrigado

Mais eu não consegui.

GRX

Tem como dar uma olhadinha para min?

Ola,
A melhor forma é criar um modulo com a funcão, conforme abaixo:

Assim, pode chamar de outros formularios, consultas e até reportes a mesma função.
Para atualizar, colocar no campo ValorUnit, no evento Depois de Actualizar.
Está a executar uma consulta que actualiza de uma só vez o preco de compra e preco de venda, com a seguinte instrução:

Código:

    DoCmd.RunSQL "UPDATE TBL_MERCADORIAS SET TBL_MERCADORIAS.[PREÇOCOMPRA] = " & Me.ValorUnit & ", TBL_MERCADORIAS.[PREÇOVENDA] = '" & fncPrecificacao(Me.ValorUnit) & "' WHERE TBL_MERCADORIAS.[CODIGO] = " & Me.Produto.Column(0) & ";"

Ficando assim:

Veja se consegue efetuar as alterações, caso necessário vou postar depois o ficheiro de teste.
Abraço

Boa Tarde

Tem como me enviar o exemplo, eu não consegui.

Pode enviar por e-mail se quiser.

deison.dgamusic@gmail.com

Desde já agradeço.

Olá, aqui vai grx.rar
Abraço

Valeu, Muito obrigado, me ajudou bastante.

Boa Noite, obrigado pelo retorno.
Se está concluído, não se esqueça de dar o tópico como resolvido, veja link abaixo:
http://maximoaccess.forumeiros.com/t860-resolucao-de-topicos
Abraço

Boa Noite

Teve um Probleminha,

Quando eu lanço outra nota de entrada com o valor diferente da nota anterior ele não usa o maior valor e nem soma os ítens.

Olá, o código efetuado não é para lançar o maior valor, é para lançar com base na ultima compra e está a fazer.
Quanto ao somar itens, o que quer dizer com isso???
Abraço

Boa tarde pessoal

Estou precisando de ajuda e se alguém poder me ajudar agradeceria muito.

seguinte estou criando um sistema de venda, ja ta quase pronto mas o que eu mais quero e colocar vendas com código de barra, para quando fosse digitado o numero do código de barra aparecesse alto matico a descrição do produto, o valor unitário, e quando eu colocasse a unidade multiplicasse alto matico, alguém ai poderia me ajudar por favor. https://2img.net/i/fa/i/smiles/icon_study.png

Muito Obrigado Deu Certinho.