Pessoal, boa tarde!
Mais uma vez, preciso da colaboração de vocês...
Os campos das somas de cada subformulário, está demorando muito para aparecer o resultado. Pesquisei aqui no fórum e encontrei um caso semelhante, no qual, sob orientação dos mestres JPaulo e Avelino Sampaio, o problema foi resolvido.
https://www.maximoaccess.com/t12627-resolvidopor-que-meu-formulario-demora-a-somar
Apliquei no meu, porém, resolveu parcialmente...
No frmPRINCIPAL, além dos campos para filtragens (datas e combos para Credores e Clientes), existem dois subs (sfrmOBRIGACOES e sfrmCREDITOS) nos quais listo as informações de cada um deles (relação de Obrigações a Pagar e relação de Créditos a Vencer) oriundos das suas respectivas Consultas (con_OBRIGACOES e con_CREDITOS), e no rodapé tem o Total de cada relação (=Soma([vlrObr]) e =Soma([vlrCred])).
Seguindo as orientações do tópico citado, coloquei o Me.Recalc no Load do frmPRINCIPAL que resolveu o problema ao carregar o form. Mas ao clicar no botão que permite a filtragem por Credores e/ou Clientes, não obtive sucesso mesmo colocando “Me.Recalc” na função correspondente. Também cliquei F9, e nada acontece.
Os filtros estão funcionando. Retornando os registros esperados.
Por curiosidade, abri o mesmo projeto em 3 pcs diferentes e para minha surpresa, funcionou em 1. Todas com win7 e access2007.
Abraço.
Mais uma vez, preciso da colaboração de vocês...
Os campos das somas de cada subformulário, está demorando muito para aparecer o resultado. Pesquisei aqui no fórum e encontrei um caso semelhante, no qual, sob orientação dos mestres JPaulo e Avelino Sampaio, o problema foi resolvido.
https://www.maximoaccess.com/t12627-resolvidopor-que-meu-formulario-demora-a-somar
Apliquei no meu, porém, resolveu parcialmente...
No frmPRINCIPAL, além dos campos para filtragens (datas e combos para Credores e Clientes), existem dois subs (sfrmOBRIGACOES e sfrmCREDITOS) nos quais listo as informações de cada um deles (relação de Obrigações a Pagar e relação de Créditos a Vencer) oriundos das suas respectivas Consultas (con_OBRIGACOES e con_CREDITOS), e no rodapé tem o Total de cada relação (=Soma([vlrObr]) e =Soma([vlrCred])).
Seguindo as orientações do tópico citado, coloquei o Me.Recalc no Load do frmPRINCIPAL que resolveu o problema ao carregar o form. Mas ao clicar no botão que permite a filtragem por Credores e/ou Clientes, não obtive sucesso mesmo colocando “Me.Recalc” na função correspondente. Também cliquei F9, e nada acontece.
- Código:
Private Sub btFiltrarCredor_Click()
Me.txtCREDOR.Enabled = True
Me!sfrmOBRIGACOES.Form.Filter = "CODCREDOR= txtCREDOR"
Me!sfrmOBRIGACOES.Form.FilterOn = True
Me.Recalc '<-------
btImprimir.SetFocus
btRemoverFiltroCredor.Enabled = True
btFiltrarCredor.Enabled = False
End Sub
Os filtros estão funcionando. Retornando os registros esperados.
Por curiosidade, abri o mesmo projeto em 3 pcs diferentes e para minha surpresa, funcionou em 1. Todas com win7 e access2007.
Abraço.