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]Erro em Cálculo de Campo via VBA.

    avatar
    Sagres
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/08/2011

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Erro em Cálculo de Campo via VBA.

    Mensagem  Sagres 4/2/2012, 16:55

    Prezados boa tarde.

    Tenho um formulário que através do comando de um botão executa o cálculo abaixo, porém este cálculo funciona até R$ 0,80. Um valor menor que este ele zera o campo.

    Sabe me dizer onde a estrutura falhou? Porque ele realiza o cálculo corretamente até R$ 0,80? Após isto o retorno do cálculo é R$0?

    ______________________________________________________________________________
    If Me.ValorUnitário And Quantidade <> "" Then
    ValorTotal.Value = ValorUnitário * Quantidade
    Else
    ValorUnitário.Value = 0
    Quantidade.Value = 0
    ValorTotal.Value = 0
    End If
    ______________________________________________________________________________

    Sguardo o retorno dos expert's

    Muito Obrigado.

    Sagres
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Assis 4/2/2012, 17:14

    O erro tem que estar aqui
    If Me.ValorUnitário And Quantidade <> "" Then


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Sagres
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/08/2011

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Sagres 4/2/2012, 17:18

    Prezado Assis.

    Este código apenas verifica se os campos estão preenchidos, correto?

    Onde exatamente ele influencia no resultado final?

    Muito Obrigado pela valiosa ajuda.

    Sagres
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Assis 4/2/2012, 17:22


    Poste aqui a tabela e o form aonde faz este calculo

    Versão 2003


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Sagres
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/08/2011

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Sagres 4/2/2012, 17:33

    a tabela onde o cálculo é feito é a DADOS

    O formulário onde está o botão para realização do cálculo é o emissão de pedidos.
    Anexos
    [Resolvido]Erro em Cálculo de Campo via VBA. AttachmentBD.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (358 Kb) Baixado 8 vez(es)


    Última edição por Sagres em 4/2/2012, 17:39, editado 1 vez(es)
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Assis 4/2/2012, 17:35

    Filipe tem de por aqui a Base de Dados ou parte dela


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Sagres
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/08/2011

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Sagres 4/2/2012, 17:40

    Prezado Assis,

    BD postado.

    Desculpe pelo equívoco...

    Aguardo seu retorno.

    Muito obrigado.

    Sagres.
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Assis 4/2/2012, 17:56

    Filipe

    Aonde postou a BD... aqui nã está.

    Se tiver dificuldades em postar aqui no forum, envia para o meu mail

    anibal.assis@sapo.pt


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Convidad
    Convidado


    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Convidad 4/2/2012, 18:03



    If Me.ValorUnitário <> "" And Me.Quantidade <> ""
    avatar
    Sagres
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/08/2011

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Sagres 4/2/2012, 18:04

    bd enviado via e-mail.
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Assis 4/2/2012, 22:28

    Filipe

    Teste a formula que o amigo Norberto colocou na mensagem Nº 9

    Bom fim de semana


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Sagres
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/08/2011

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Sagres 7/2/2012, 19:47

    Prezados,

    Acho que o problema não está nesta fórmula, pois o campo é calculado normalmente até um determinado valor.

    O problema é que a fórmula retorna valor zero para os cálculos dos produtos com valor infeior a R$ 0,80.

    Teria de achar alguma fórmula que calcule o valor desde R$ 0,01.

    Aguardo a ajuda.

    Obrigado.

    felipe.
    avatar
    Convidad
    Convidado


    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Convidad 7/2/2012, 20:12


    Tente assim:

    If Me.ValorUnitário = "" Or IsNull(Me.ValorUnitário) Then Me.ValorUnitário = 0
    If Me.Quantidade = "" Or IsNull(Me.Quantidade) Then Me.Quantidade = 0
    Me.ValorTotal = Nz(Me.ValorUnitário) * Nz(Me.Quantidade)

    Verifique os Formatos de exibição dos campos e se não há algum tipo arredondamento interferindo.
    avatar
    Sagres
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/08/2011

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Sagres 15/2/2012, 02:02

    norbs verificarei e retornarei.

    Desde já muito obrigado.

    Sagres
    avatar
    Sagres
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/08/2011

    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Sagres 25/2/2012, 16:45

    Norbs muito Obrigado.

    Com o código repassado e a correção dos formatos do campo a correção foi efetuada e o BD funcionou perfeitamente.

    Obrigado.

    Sagres

    avatar
    Convidad
    Convidado


    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Convidad 25/2/2012, 18:10


    Ótimo, agradecemos o retorno!

    Conteúdo patrocinado


    [Resolvido]Erro em Cálculo de Campo via VBA. Empty Re: [Resolvido]Erro em Cálculo de Campo via VBA.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 07:44