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]Problemas de atualização em formulário

    rg3915
    rg3915
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 119
    Registrado : 17/06/2013

    [Resolvido]Problemas de atualização em formulário Empty Problemas de atualização em formulário

    Mensagem  rg3915 25/7/2013, 17:40

    Talvez isto seja um problema fácil de resolver, mas não sei como:
    Eu tenho um formulário baseado numa consulta,
    este formulário tem o campo TotalGeral não acoplado com fonte do controle = [SomaMat] + [SomaMO] + [Frete]
    desta fórmula os 2 campos de soma é não acoplado e o Frete é acoplado.

    O problema é que eu tenho outros que são calculados no evento Após Atualizar.

    Dai quando eu clico no botão 'Imprimir' ele vai abrir um relatório.

    O problema é que toda vez eu tenho que dar F9 pra atualizar tudo.

    Eu sei do comando Me.Requery, mas quando eu aplico este comando no botão 'Imprimir',
    se o meu 'Frete' tiver um valor, ele não considera o TotalGeral no primeiro momento,
    ou seja, ele lê o Frete e só depois atualiza o campo calculado TotalGeral.
    O problema é que eu queria verificar quando que uma pessoa fez 2 ou 3 parcelas do TotalGeral,
    ou seja, eu queria conferir se o cara fez parcela1 + parcela2 + parcela3 = TotalGeral.
    Eu eu verifico ao clicar no botão 'Imprimir':

    Código:
    Private Sub btnImprimir_Click()

       If parcela1 + parcela2 + parcela3 <> TotalGeral Then
          MsgBox "A soma das parcelas está diferente do total."
          Exit Sub
       End If

    End Sub
    Está bem simplificado, é somente a ideia, o problema é que quando eu digito os valores das parcelas, que pode ser 1 parcela, 2 ou 3, ele não atualiza tudo, e quando eu tento comparar ele esbarra no Frete e no TotalGeral.

    Talvez eu tenha complicado muito, mas como eu faço para atualizar constantemente sem precisar pressionar F9?
    Marco Messa
    Marco Messa
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 291
    Registrado : 28/06/2010

    [Resolvido]Problemas de atualização em formulário Empty Re: [Resolvido]Problemas de atualização em formulário

    Mensagem  Marco Messa 25/7/2013, 19:04

    Já tentou com um Me.Refresh?

    Código:
    Private Sub btnImprimir_Click()
      Me.Refresh

      If parcela1 + parcela2 + parcela3 <> TotalGeral Then
          MsgBox "A soma das parcelas está diferente do total."
          Exit Sub
      End If

    End Sub

    Abrass cheers 


    .................................................................................
    Tea with me that I book your face Cool
    rg3915
    rg3915
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 119
    Registrado : 17/06/2013

    [Resolvido]Problemas de atualização em formulário Empty Re: [Resolvido]Problemas de atualização em formulário

    Mensagem  rg3915 26/7/2013, 01:05

    Parece que funcionou, valeu!

    Conteúdo patrocinado


    [Resolvido]Problemas de atualização em formulário Empty Re: [Resolvido]Problemas de atualização em formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 20/5/2024, 03:05