[Resolvido]Carregar totais de uma tabela em um formulário VBA

Olá amigos

Pesquisei aqui no fórum porem não encontrei e trago mais essa duvida para enriquecer o saber de muitos

gostaria que ao carregar um formulário também fosse carregado o total exibido la na tabela (detalhe "tabela não vinculada")
até agora só consegui fazer carregar o primeiro registro e não é isso que desejo

segue anexo.

de já agradeço

Bom dia,

Já tentou usar o DSum("campo", "tabela", "criterio")?

Abraço.

Olá..
Troque o codigo da fncCarregaValorTotal() por este e veja se é oque pretende.
Mas antes vá em sua tabela e mude o nome do campo Valor para txtValor e campo Data para DtData, porque estes nomes são de uso exclusivos do access e pode te gerar problemas futuros(Fica a dica)

Segue o Código

Código:

Dim rs As DAO.Recordset
   
    Set rs = CurrentDb.OpenRecordset("SELECT Sum([tbl_Entrada/Saida].txtValor) AS txtValorInicial FROM [tbl_Entrada/Saida];")
   
    Me.ValorInicial = rs!txtValorInicial


De Retorno

Abraços

PS: Desculpa ao amigo Cassio, Quando vi já havia postado

Eu tentei os dois modos

O sugerido pelo Cassio achei bem simples porem não consegui.

Já o postado pelo Celso deu certo pois bastou uma minima alteração no código

Agradeço a todos. Cassio e Celso valeu! agradeço pela atenção isso vai me ajudar bastante em meu projeto.

Boa tarde,

O fórum agradece o retorno.

Abraço.