Usar critérios de data e hora de um controle em um formulário
Para alterar o argumento criteria de uma operação com base na decisão do usuário, você pode especificar que o critério venha de um controle em um formulário. Por exemplo, você pode especificar que o argumento criteria vem de uma caixa de listagem contendo datas de pedidos de uma tabela Pedidos.
Para especificar um critério de data ou hora oriundo de um controle em um formulário, você inclui no argumento criteria uma expressão que faça referência ao controle no formulário. Essa expressão deve ser separada da expressão de cadeia de caracteres, para que o Access avalie a expressão de controle primeiro e a concatene com o restante da expressão de cadeia de caracteres antes de executar a operação apropriada.
Além de colocar a expressão de cadeia de caracteres toda entre aspas duplas ("), você deve também verificar se os critérios de data ou hora dentro da expressão de cadeia de caracteres estão entre sinais numéricos (#). Os sinais numéricos precisam estar incluídos nas cadeias de caracteres adjacentes à expressão que faz referência ao controle no formulário.
Observação
Os sinais de número indicam ao Access que o argumento de critérios contém uma data ou hora dentro de uma cadeia de caracteres.
The following examples set a form's Filter or ServerFilter property based on criteria that come from a control named HireDate that is on the form. Note the placement of the number signs.
Forms!Employees.Filter = "[HireDate] >= #" _
& Forms!Employees!HireDate & "#"
Forms!Employees.FilterOn = True
Forms!Employees.ServerFilter = "[HireDate] >= #" _
& Forms!Employees!HireDate & "#"
Forms!Employees.FilterOn = True
Se o valor atual do controle HireDate for 5-1-92
, a propriedade Filter ou ServerFilter terá o seguinte argumento de critério :
"[HireDate] >= #5-1-92#"
Dica
Para solucionar problemas em uma expressão no argumento criteria, divida a expressão em componentes menores e teste cada um individualmente na janela Imediata. Quando todos os componentes estiverem funcionando corretamente, junte-os de novo, um de cada vez, até que a expressão completa funcione corretamente.
Você também pode incluir uma variável representando data ou hora no argumento criteria. A variável deve ser separada da expressão de cadeia de caracteres, para que o Access avalie a variável primeiro e, em seguida, concatene-a com o restante da expressão de cadeia de caracteres. Os critérios de data ou hora devem estar circunscritos entre sinais numéricos.
O exemplo a seguir mostra como construir um argumento criteria que inclui uma variável representando uma data ou hora:
Dim datHireDate As Date
datHireDate = #5-1-92#
Forms!Employees.Filter = "[HireDate] >= #" _
& datHireDate & "#"
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.
Comentários
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:Enviar e exibir comentários de