Olá a todos... pesquisei vi alguns exemplos mas não o pretendido . . . ou em outros casos (exemplos aqui do fórum) como chegar ao pretendido.
No form tenho uma consulta e um campo de pesquisa que ao escrever vai filtrando o Nome dos Utentes, até aqui 5 Estrelas... tenho também um botão de Pré-Visualizar só que pré-visualiza tudo e não apenas o que esta filtrado...
Código no campo de pesquisa
Private Sub txtPesquisa_Change()
If VarEspaco = 1 Then
VarEspaco = 0
Else
Me.Recalc
SendKeys "{F2}"
End If
End Sub
Na consulta o critério utilizado
Como [forms]![CONSULTA_REGISTO_IDAS_URGENCIAS].[txtpesquisa] & "*"
No botão de Pré-Visualizar
DoCmd.OpenReport "Registo_Idas_Urgencia", acViewPreview 'Visalizar Impressão
Aqui era o que pretendia que apenas aparecesse o que foi filtrado... Obrigado
No form tenho uma consulta e um campo de pesquisa que ao escrever vai filtrando o Nome dos Utentes, até aqui 5 Estrelas... tenho também um botão de Pré-Visualizar só que pré-visualiza tudo e não apenas o que esta filtrado...
Código no campo de pesquisa
Private Sub txtPesquisa_Change()
If VarEspaco = 1 Then
VarEspaco = 0
Else
Me.Recalc
SendKeys "{F2}"
End If
End Sub
Na consulta o critério utilizado
Como [forms]![CONSULTA_REGISTO_IDAS_URGENCIAS].[txtpesquisa] & "*"
No botão de Pré-Visualizar
DoCmd.OpenReport "Registo_Idas_Urgencia", acViewPreview 'Visalizar Impressão
Aqui era o que pretendia que apenas aparecesse o que foi filtrado... Obrigado