[Resolvido]Contagem de registros em SUBFORM atualizando FORM PRINCIPAL

Boa tarde!
Tenho um formulário principal e um sub-formulário continuo linkados onde consigo pesquisar os registros através de datas,
Por exemplo:
ProgramBD -> Tabela
formPrincipal - > Formulario Principal
Sub_formSem - > Sub-formulario
_____________________
formPrincipal > pesquisa> 01/09 a 12/09
subform me informa as atividades que tenho,aonde são e qual a data das mesmas:

Atividade : Corrigir cabeamento | Local: local 1 | data: 05/09
Atividade : Corrigir cabeamento | Local: local 2 | data: 01/09
Atividade : Corrigir cabeamento | Local: local 2 | data: 11/09
Atividade : Corrigir cabeamento | Local: local 2 | data: 08/09
Atividade : Corrigir cabeamento | Local: local 3 | data: 09/09

Assim gostaria de contar após o filtro quantas atividades tenho para realizar no Local 2.

estava usando a criação de dois campos, um no subform(txb1) com a formula:
=DContar("[Localizacao]";"ProgramBD";"[Localizacao]='Local 2'")

e no form principal (txb2) com a formula:
=[SUB_formSem]![Formulário]![txb1]

porém ele não atualiza quando eu faço a pesquisa das datas..

Alguém poderia me ajudar?
Obrigado!

Apos o comando de contagem feito pelo Dcount, coloque

Forms!formPrincipal!txb2.requery

infelizmente não funcionou com o requery,  segue as prints que tirei
https://i.servimg.com/u/f68/19/96/37/37/vba_re10.png
https://i.servimg.com/u/f68/19/96/37/37/att_da10.png
https://i.servimg.com/u/f68/19/96/37/37/formul10.png

O que mais que da para gente tentar? Pode me ajudar?

Obrigado!

Também tentei dar o requery através do botão de filtro que já tenho

Código:

Private Sub btnFiltro_Click()
If IsNull(dataSem) Then
MsgBox ("favor preencher as datas"), vbOKOnly
ElseIf IsNull(datafim) Then
MsgBox ("favor preencher as datas"), vbOKOnly
Else
dataIniSem.Value = dataSem.Value
dataFimSem.Value = datafim.Value
CxPesquisa2.Value = Empty
DoCmd.Requery "SUB_formSem"
Mod1_princ.Requery
End If

End Sub

Olá CjuniorAJ10

Se você puder enviar seu formulário, será mais fácil ajudar

Saludos desde Bolivia

Boa noite meu amigo, segue exemplo em anexo:

Poderiam ajudar? Ainda estou quebrando a cabeça kkk (iniciante é assim né? )

Olá CjuniorAJ10

Em anexo o arquivo corrigido e funciona !!!



Saludos desde Bolivia

MUITO OBRIGADO!!!
IREI ESTUDAR A FUNÇÃO E UTILIZAR EM MAIS PROJETOS!!


OBRIGADO MESMO!
E BOM DIA!!

Olá CjuniorAJ10

Resolveu!!!

simmmm ihull