Filtro em Relatório

Olá pessoal!
Tenho essa linha de comando para fazer filtros de três variáveis no relatório: Num_Lote, ANO e Dia.

Private Sub Report_Open(Cancel As Integer)
Dim strFiltro$
strFiltro = "[Num_Lote] ='" & Forms!frmrltNotaProducao!cboLote & "' and'[ANO] ='" & Forms!frmrltNotaProducao!Texto6 & "' and"
strFiltro = strFiltro & "([Dia] between #" & Format(Forms!frmrltNotaProducao!dataInicial, "mm/dd/yyyy") & "# "
strFiltro = strFiltro & "AND #" & Format(Forms!frmrltNotaProducao!DataFinal, "mm/dd/yyyy") & "#)"
Me.RecordSource = "SELECT * FROM Nota_Producao_Aves_Postura WHERE " & strFiltro & " ORDER BY [Dia];"
End Sub

Porém surge o erro:
Erro de sintaxe (operador faltando) na expressão de consulta ´[Num_Lote]='1' and [ANO]='2020' and ([Dia] between #04/01/2021# AND #05/31/2021#) ORDER BY [Dia]'

Quando deixo apenas [Num_Lote] e o filtro por [Dia] não dá erro. Só que preciso filtrar por ano pois posso ter mesmo Num_Lote porém em ANO diferente.

Grato se puderem ajudar

Sandro

Não é possível analisar somente a sentença SQL, pois, precisamos

verificar os nomes dos controles que estão nela.

Então ao que parece está usando as palavras reservadas do Access como Dia, Ano,

como nome de campos.

[ANO] me parece nome de um campo, "Forms!frmrltNotaProducao!Texto6 -->Nomeie os controles),

se houver somente  o ano (2020), então é numérico e na sentença está com aspas simples '2020'.

Como pode ver somente a sentença SQL não da pra ajudar.

Sobre nomear os controles, se não colocar os nomes neles. não tem como analisar os códigos.

Ninguém se aventura a tentar ajudar quando os nomes deles está com o padrão do Access.

O Access ao criar um controle usa um padrão para poder criar o controles, caso contrário, não cria.


Aguardo...

Sandro

Como ficamos?

Obrigado noobezinho!
Resolvi fazer o filtro de outra forma, utilizando o "Como" e o "Entre" nos critérios da consulta.
Caso tenha alguma dúvida volto a procurar.

Pode finalizar.

Sandro

Se resolveu, então coloque o Resolvido no título do tópico

clicando no botão resolvido abaixo do retângulo de de edição

de mensagem.


Balem