[Resolvido]Contagem de registros no subformulario

Ao informar a data, caso haja registro correspondentes, o subformulário é preenchido e necessito que seja contado quantas vezes o campo Periodo é igual a "manhã" e quantas é igual a "tarde", sendo o limite máximo de 5 (cinco) registro para cada um.

Olá Tauron,

No frmAgenda, no campo "Data", no evento "Após Atualizar" copie e cole o seguinte código:

Código:



    txtManha = DCount("Nome", "tblCliente", "Periodo = 'Manhã' AND Data =#" & Format(Me.Data, "dd/mm/yyyy") & "#")
    txtTarde = DCount("Nome", "tblCliente", "Periodo = 'Tarde' AND Data =#" & Format(Me.Data, "dd/mm/yyyy") & "#")



Espero ter ajudado


Boa sorte

Boa tarde Alexandre,

Muitíssimo obrigado.

Valeu Tauron!!!

O fórum agradece.

Boa sorte.