[Resolvido]Como usar a função Dcount

Senhores boa tarde,



Estou com um Proplema com essa função, é o seguinte tenho dois form em folha de dados uma com o nome de Tb_base e Sub_lista.

A Tb_base tem os mesmo registros que a Sub_lista porem na Tb_base não se repete e a Sub_lista repete, queria colocar a função Dcount nos campos da Tb_base.



Exemplo:

Tb_base

Campo1                     Qtd_Registro                         ResumoReceb
001                                   2                                              2
002                                   4                                              3
003                                   2                    


Sub_lista

Campo1                        Recebimento
001                                     ok
001                                     ok
002                  
002                                     ok
002                                     ok
002                                     ok
003
003


No aguardo!

Se for apenas contar os campos e enviar o resultado para uma textbox poderia ser:

me.txtCaixaTexto = Dcount ("Campo_1","Tb_base")

Caso seja contagem de uma lista pode ser assim:

Dim C as Integer, SomaQtd As Double

'Soma a quantidade

For C = 1 To suaLista.ListCount - 1 'Caso a lista tenha cabeçalho use -1
SomaQtd = SomaQtd + suaLista.Column(4, C)
Next C
Me.txtSomaQtd = SomaQtd

formiga, muito obg pela ajuda,

Não era exatemente o que eu queria! mais dei uma estuda melhor sobre essa função e consegui fazer o que eu queria.


Mesmo assim muito obg.



Deus te abençoe.