[Resolvido]Função Nz

Boa Tarde, Pessoal.

Quero parabenizar ao Amigo JPaulo por essa iniciativa deste forum e pela presteza e velocidade que tenho (imagino que outro também) em receber respostas.

Amigos estava em um outro tópico, conversando com um Fera do Access, JPaulo, e disse que iria pedir ajuda sobre a função Nz. Achei por bem colocar um outro tópico, pois pode ajudar a outros.

Tenho um formulário que busca um Sub, e esse sub é alimentado por uma consulta(VBA) onde o valor é uma SomadeValor. Quando esse resultado é Nulo por não ter linhas a somar, aparece uma mensagem dizendo que houve um erro.

Tentei colocar na Fonte de Registro do Controle(Soma) do SubForm, =Soma(Nz([SomaDeValor])), mas mesmo assim continua dando erros.

Se alguém puder me ajudar, agradeço.

Abraços.

Oi amigo Aleixo, eu aqui;

A caixa de texto terá de ficar no rodapé do SubForm, dê o nome a esse controle de txtResultado

Na Fonte de Registro do Controle(txtResultado) do SubForm coloque:

=Soma(Nz([SomaDeValor];0))

ps:
Não esqueça que Soma é uma palavra reservada do Access, tenha sempre em mente colocar por exemplo txt antes do nome do controle (txtSoma).

Boa Tarde, JPaulo.

Obrigado por sua constante interação. Fiz esse modelo sugerido, mas me aconteceu o mesmo erro. retornou um conjunto vazio. Achei estranho pois como nomeiei um variável Variant para este retorno, não teria problema.
Fiz o seguinte:
varSoma = [SubFormB].Form!Soma (Nomeando através do Form Pai, é claro)
If IsNull([SubFormB].Form!Soma) Or [SubFormB].Form!Soma = "" Then
varSoma = 0
End If

Mas dá erro na primeira linha, onde declaro a varSoma.

Mudei a estratégia e fiz o seguinte:
If [SubFormB].Form.RecordsetClone.RecordCount = 0 Then
varSoma = 0
End If

Daí beleza, funcionou. Criei uma consulta (em VB, através do SQL), onde declaro que o valor é Nz(.....), funciona para o valor.
Então entendi que era por não ter linhas para somar, e que possivelmente seria resolvido daquela forma. Perfeito.
Obrigado, mais uma vez.
Precisando, estou a disposição.

Abraços.

Boa sugestão amigo Aleixo;

Mas se quiser testar esta, fica aqui:

Dim varSoma As Variant
With Forms!FormularioPai!FormularioFilho.Form
varSoma = .Fields("Soma").Value
If IsNull(varSoma) Then
varSoma = 0
Else
varSoma = varSoma
End With

Volto a referenciar que Soma é uma palavra reservada do Access.