[Resolvido]Filtragem em relatório com 2 ou mais tabelas

Bom dia feras, blz?

Pintou um problema que não to conseguindo resolver.

Um dos meus relatórios busca dados em 3 tabelas relacionadas.

Tenho um formulário onde possuo caixas de seleção com as opções:

Série I
Série II
Série III
Série IV

O que quero é que se o usuário marque a "I" e a "III" e clique em OK, somente imprima o relatório com os dados dos alunos destas séries.
Alguma dica?

Grato dese já.

Abrasss!!!

Use o operador In().

Coloque como critério na consulta da origem da linha do relatório:

In ([Formulários]![SeuFormulário]![Série I];[Formulários]![SeuFormulário]![Série II];[Formulários]![SeuFormulário]![Série III];[Formulários]![SeuFormulário]![Série IV])

Opa Leandro, valeu pela atenção.
Esqueci de dizer que essa opção Série está na tabela tb_Alunos, porém existem itens das tabelas tb_Classes e tb_Escola.
No formulário só tem as caixas de seleção para que possa filtrar o relatório.

Abrasss!!!

Copie e cole aqui o Sql da "Origem do Registro" do relatório por favor.

Segue:

SELECT tb_DadosEscola.Nome_Escola, tb_Alunos.NUM_CH, tb_Alunos.NOME, tb_Alunos.DATA_NASC, tb_Alunos.RM, tb_Alunos.RA, tb_Alunos.OBS, tb_Classes.Sala, tb_Classes.Num_Classe, tb_Alunos.SERIE, tb_Alunos.TURMA, tb_Alunos.TURNO, tb_Alunos.ENSINO, * FROM tb_DadosEscola, tb_Alunos INNER JOIN tb_Classes ON (tb_Alunos.SERIE = tb_Classes.Serie) AND (tb_Alunos.TURMA = tb_Classes.Turma)

Teoricamente seria isso:

SELECT Nome_Escola, NUM_CH, NOME, DATA_NASC, RM, RA, OBS, Sala, Num_Classe, SERIE, TURMA, TURNO, ENSINO,
FROM tb_DadosEscola, tb_Alunos INNER JOIN tb_Classes ON (tb_Alunos.SERIE = tb_Classes.Serie) AND (tb_Alunos.TURMA = tb_Classes.Turma)
WHERE SERIE In ([Formulários]![SeuFormulário]![Série I];[Formulários]![SeuFormulário]![Série II];[Formulários]![SeuFormulário]![Série III];[Formulários]![SeuFormulário]![Série IV])

Não é isso que quero Leandro.

Esse form é para que o usuário selecione, através de caixas de seleção, a série, por exemplo:
Quero a Lista de Presença somente da Série I.
O usuário marca a caixa "Série I" e deixa as outras desmarcadas, logo, ele filtra somente os alunos da Série I da tb_Alunos.
tenho 2 botões: PILOTO e AUTORIZADOS.

Se marca a caixa da Série I e clica no botão PILOTO (que é a lista de presença) o código é esse (parte dele):

Private Sub cmdPiloto_Click()

With DoCmd
.OpenReport "rel_ListaPiloto", acViewPreview
.PrintOut , , , acHigh, 1
.Close acReport, "rel_ListaPiloto"
End With


End Sub

Ao abrir o relatório ele teria que filtrar a Série I (campo SERIE na tb_Alunos):

Private Sub Report_Open(Cancel As Integer)

Dim Filtro As String

If Form_Listas.cxInfI.Value = True Then
Filtro = "SELECT * FROM tb_DadosEscola, tb_Alunos INNER JOIN tb_Classes ON(tb_Alunos.SERIE = tb_Classes.Serie) AND (tb_Alunos.TURMA = tb_Classes.Turma) WHERE SERIE ='I' "
Me.RecordSource = Filtro
End If

End Sub

Acontece que qdo faço isso, aparece o erro que o campo SERIE aparece em 2 tabelas diferentes. E tem mesmo na tb_Alunos e tb_Classe, porém em outros casos não tive esse erro que para mim é novidade.

Entendeu?

Abrasss!!!

Você pode disponibilizar uma cópia?
Em access 2000?

Podem ocorrer pequenos erros , pois tive que tirar algumas partes do BD para a conversão, mas testei aqui e funfou o que precisa...

Segue...

No arquivo disponibilizado faltou uma tabela, não consegui concluir o teste, mas teoricamente pode ser isso, teste e dê um retorno por favor.

Bom dia Leandro.
Não é isso.
No form que indico qual lista quero imprimir, posso marcar uma ou mais opções de série.
O que quero é que ao deixar marcado, por exemplo, as séries I e III, o programa filtre os alunos da série I e imprima o relatório, depois os da série III e imprima o relatório.
Os códigos que te passei quase fizeram isso, na verdade, se uso uma tabela só, funciona certinho, mas não to conseguindo esse filtro com 2 tabelas.
Entendeu?

PS:. Coloquei a tabela que estava faltando...

Abrasss!!!

Alguma luz Mestres???

Alguém???

Depois de muita paciência e de qse quebrar a cabeça, consegui.
Valeu pela ajuda feras...

Abrasss!