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


2 participantes

    [Resolvido]Preciso de ajuda com arredondamento

    avatar
    jorgek
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 08/12/2012

    [Resolvido]Preciso de ajuda com arredondamento Empty [Resolvido]Preciso de ajuda com arredondamento

    Mensagem  jorgek 13/2/2014, 09:40

    Bom dia, mestres!
    Venho com mais uma dúvida cruel! Smile
    É o seguinte:
    Tenho um formulário que quando a pessoa clica em um determinado botão, uma caixa de texto mostra o preço com desconto.
    O formulário que mostra o desconto está com este código:

    Código:
    VlDesc = Rounder(Preco - (Preco * 5 / 100), 1)

    Tenho também um relatório, baseado em uma consulta, que está com esta fórmula:

    Código:
    Preco100Kg: Arred(([Preço]-[Preço]*5/100);1)

    O que está acontecendo é que, no formulário, quando o último número da casa decimal do preço do produto é igual a 5, no formulário arredonda para cima e no relatório arredonda para baixo.

    Por exemplo:
    O preço de um produto é R$ 55,00. O preço com desconto para 100Kg fica R$ 52,25.
    Arredondando:
    No formulário fica: R$ 52,30.
    No relatório fica: R$ 52,20.

    Gostaria de saber como faço para resolver este problema.
    Desde já agradeço ajuda de todos!
    avatar
    jorgek
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 08/12/2012

    [Resolvido]Preciso de ajuda com arredondamento Empty [Re]Preciso de ajuda com arredondamento

    Mensagem  jorgek 13/2/2014, 09:58

    Consegui resolver o problema.
    É que o rapaz que eu substituí utilizou a função Rounder em vez Round.
    Alterei para Round e os preços estão batendo agora.

    Obrigado! Smile
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Preciso de ajuda com arredondamento Empty Re: [Resolvido]Preciso de ajuda com arredondamento

    Mensagem  Avelino Sampaio 13/2/2014, 10:01

    Olá!

    O round() tem este problema que é corrigido acrescentando um valor bem baixo.  Exemplo:

    Preco100Kg: Arred(([Preço]-[Preço]*5/100) + 0.000001 ;1)

    O resultado é este : 52,250001 que arredondando resulta em 5,30

    Sucesso!


    Última edição por Avelino Sampaio em 13/2/2014, 10:21, editado 1 vez(es)


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    jorgek
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 08/12/2012

    [Resolvido]Preciso de ajuda com arredondamento Empty Re: [Resolvido]Preciso de ajuda com arredondamento

    Mensagem  jorgek 13/2/2014, 10:19

    Obrigado, mestre Avelino!

    Conteúdo patrocinado


    [Resolvido]Preciso de ajuda com arredondamento Empty Re: [Resolvido]Preciso de ajuda com arredondamento

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 20:35