[Resolvido]Somar somente registros marcados em Caixa de seleção

Saudações a todos do fórum.
 
Recorro novamente aos amigos para mais uma dúvida que não consegui solução, que é a seguinte.
 
Tenho um form (Formulário continuo com vários registros) com os campos quantidade vlr.unitário(multiplicando a quantidade X valor unitário), um campo sim/não(Caixa de seleção) para ser marcar quando conferido.
 
Como fazer para calcular em um campo Texto (nãoacoplado) a soma do campo mencionado acima somente os campos quando caixa de seleção marcado sim.
 

Sou grato pela atenção de todos.

Olá Naldo,

Tive exatamente a mesma necessidade que você e consegui resolver (através da ajuda do fórum) da seguinte maneira:

- Acrescentei na tabela um campo (SomaParcial) do tipo sim/não e acrescentei esse campo ao formulário;
- Na fonte do Registro da caixa de texto (não acoplado) : =DSoma("[ValorDespesa]";"[TblDespesas]";"[SomaParcial]=-1")
- No evento Após Atualizar do campo sim/não: Me.Form.Requery (para atualizar a soma parcial)
- No evento Ao Fechar do formulário coloca o código abaixo (para desmarcar os registros)

    
    Dim strSql As String
    Dim Banco As DAO.Database
    Set Banco = CurrentDb
    
    strSql = "UPDATE TblDespesas SET TblDespesas.SomaParcial = No;"
    Banco.Execute strSql


Testa e qualquer dúvida é só dar um grito.


Nivaldo.

Nivaldo, sou grato pela sua atenção e presteza.
 

Tentei por aqui mas não deu certo pois nesta somatória tem campos como desconto em % descontos em R$(tanto por itens como no total do pedido) quantidade valor unitário e por ai em diante, tentei de várias formas que eu sei mas nada cara.

Olá Naldo,

No meu caso, eu só preciso somar valores alternados (que já estão na tabela) sem precisar de campo calculado.

Se puder, disponibiliza um pequeno exemplo do teu bd. Fica mais fácil de ajudar.

Nivaldo.

Sou grato pela sua atenção.

não aceita a transf. o banco é muito grande.

Grande abraço e muito obrigado pela atenção.

Bom dia Naldo,

Para diminuir o tamanho faz um exemplo contendo somente o essencial para a solução do problema, eliminando todas ao outros objetos (outros formulários, relatórios, módulos, consultas, etc), depois compacta com ZIP e envia.

Más se já foi resolvido, melhor ainda.

Nivaldo.