[Resolvido]Problema com critérios

bOas tardes

venho hoje aqui porque tenho uma duvida
tenho um problema com criterios
queria que o criterio perguntase o ano que desejava obter os registos e depois aparecer os registos dos ultimos 3 anos mas só os que eram diferentes aos processos que já foram arquivados que é um campo predefenido na tabela tipos de medidas

Desde já o meu obrigada

Boa tarde,
1º - deve ter controlo sobre os processos já arquivados
2º quer perguntar o ano e quer obter o resultado dos últimos 3 anos. Para quê saber o ano?
3º Dê todos os detalhes. Em que tabela? quais campos? etc

ddo genero preciso saber pois a base dadados vai conter registos desde 2002 e esse criterio iria servir para um gereno de estatistica
as tabelas a utilizar são muitas se puser um exemplo eu consigo adaptar só queria mesmo ter uma luz para me guiar eu tentei fazer assim
Ano([Ano: ]) = Ano + Ano-1 + Ano-2 + Ano-3 onde Negado "Arquivo do Processo"

não sei se funciona nem se não

Não funciona, mas parece-me que entendi o que pretende
Informe as tabelas e campos envolvidos, pois é melhor fazer a consulta em VBA.
Se fôr para utilizar em formulário ou relatório, é melhor colocar a consulta dentro do respectivo módulo

Posso dar o exemplo de uma visto que são para aplicar em cerca de 10 relatórios o exemplo de um a freguesia tem 3 tablea freguesias onde tem só um campo que é nomefreguesia depois tem um processo que tem o idprocesso nacional nome datnasc anoabertura nomefreguesia pai mae outro encarregado sexo e depois temos a tabela eventos que tem o idevento data observacao idprocesso adjunto gestor tipodeevento(que é esterna que tem outra tabela com um campo que pretendo criar um critério o campo Arquivo do Processo) problemaidentificado e problema validado
o objetivo é fazer um genero de estatística digamos que ele só vai aparecer os dados do ano atual + os dados dos 3 anos anteriores que nao tenham sido fechados neste casso com o texto "Arquivo do Processo"

não sei se me fiz entender

A descrição ficou confusa.
Estruture a informação e disponibilize a bd

Bom o que realmente quero é um critério que quando tenho uma consulta como pode ver ai na base de dados me permita filtrar os dados pedindo o ano e depois mostar os processos inseridos dos ultimos 3 anos que não tenham no campo tipo de medidas "Arquivo do Processo"

Boa tarde,
Perante tantos objectos na bd, informe o que pretende tendo em consideração os dados disponibilizados

exemplo consulta estatistica eventos po freguesia freguesias ta a filtrar no ano atual e agora queria alterar para ele filtrar perguntando o ano que queria procurar e juntar a eles os ultimos 3 anos onde os eventos não tivesem na coluna tipodeevento "Arquivo do Processo"

Boa tarde,
Informe a partir dos dados das tabelas. Aconselho a ter as consultas dentro de formulários ou relatórios para que, quando não precisar do formulário ou relatório, a eliminação seja a par

como assim imformar apartir dos dados ? ok

Refere-se a consulta com base noutras consultas. Deve-se, se possível, criar consulta a partir das tabelas

ela esta criada apartir da tabela em estatistica eventos por freguesia1 eu pus 2 para utilizar uma funcao

Bom dia,
Sempre que o nome de algum objecto tenha espaços (que deviam ser evitados) escreva-o envolvido em aspas ou pelicas, senão, a leitura fica confusa
'eventos por freguesia1' não é tabela, é consulta.
Vou tentar descobrir as verdadeiras origens dos dados, que era isso que eu queria saber.
Descrevam o mais detalhado possível. Quem tenta ajudar não deve perder tempo a adivinhar o que têm nem o que pretendem, apenas devem-se ocupar em descobrir o caminho

ah sim peço desculpa mas não tinha entendido bem a pergunta a origem dos dados no caso das freguesias é tabela "freguesias" que vai ligar a tabela "processos" por o campo nomedefreguesias e depois vai ligar a tabela "eventos" por o campo "idprocesso" que depois vai ligar a tabela "medidas" por o campo "idevento" e depois a tabela "medidas" liga a tabela "tipodemedidas" pelo campo "tipodemedida" onde esta os dados onde desejo criar o critério


Mais uma vez desculpe
E brigada

Cumprimentos

Daniel ferreira

Estou a tentar deslindrar e estou neste ponto, veja:
- crie uma consulta nova aCns1, em modo SQL, cole
SELECT Freguesias.NomeFreguesia, Count(Eventos.idEvento) AS ContarDeidEvento
FROM (Freguesias LEFT JOIN Processos ON Freguesias.NomeFreguesia = Processos.NomeFreguesia) LEFT JOIN Eventos ON Processos.idProcesso = Eventos.idProcesso
WHERE strAnos() AND Month(Data)<=Month(Date()) AND Day(data)<=Day(Date())
GROUP BY Freguesias.NomeFreguesia;
- crie um módulo e cole
Function strAnos() As String
Dim intAno As Integer

intAno = InputBox("Introduza o ano que pretende consultar.", , Year(Date))
strAnos = "Year(Data) IN (" & intAno & "," & intAno - 1 & "," & intAno - 2 & ")"
End Function

- abra a consulta

Não estou a conseguir abrir a consulta visto que me da sempre erro ao abrir a consulta por causa da funçao "strAnos()" visto que acho que o modulo não esta correctamente inserido eu criei mas é necessario apontar a sua consulta e que não encontro lá para apontar

Edit: ele esta dentro do grupo já criado para os forms ou seja basedados1

Estou a tentar resolver a consulta pelo critérios dos anos anteriores. Verifiquei agora o seguinte: A consulta que tem está a filtrar pelo ano e que o mês seja igual ou menor ao actual e o dia seja menor ou igual ao actual. É isto que pretende? Se sim, por exemplo, colocando o ano de 2013, um evento de 2013-06-28 não aparece porque o ano corresponde, o mês corresponde mas o dia é superior ao dia de hoje. Se pretender outros critérios especifique melhor
Melhore os nomes:
Nomes sem espaços e sugestivos
Tem várias consultas começadas por Estatísitca
Data (nome reservado do Access) -> DataProcesso, DataMedida
ProblemaIdenteficado -> ProblemaIdentificado
Arrange a visualização das relações. Ajuda muito na hora de criar objectos

Num módulo novo (menu criar, módulo) cole
Option Compare Database
Option Explicit

Sub CriaCst1()
On Error GoTo TrataErro
Dim intAno As Integer, strAnos As String

intAno = InputBox("Introduza o ano que pretende consultar.", , Year(Date))
strAnos = intAno & "," & intAno - 1 & "," & intAno - 2
CurrentDb.Execute "DROP TABLE Cst1"
CurrentDb.CreateQueryDef "Cst1", "SELECT Freguesias.NomeFreguesia, Count(Eventos.idEvento) AS ContarDeIdEvento FROM (Freguesias LEFT JOIN Processos ON Freguesias.NomeFreguesia = Processos.NomeFreguesia) LEFT JOIN Eventos ON Processos.idProcesso = Eventos.idProcesso WHERE Year(Data) IN (" & strAnos & ") AND Month(Data)<=Month(Date()) AND Day(data)<=Day(Date()) GROUP BY Freguesias.NomeFreguesia;"
Exit Sub
TrataErro:
If Err.Number = 3376 Then 'consulta não existe
Resume Next
End If
End Sub

- execute o código e terá a consulta Cst1
- veja o critério das datas como pretende

não a ideia agora é ele pedir o ano ou seja eliminar os campos que comparavam os dias e messes filtrar só mesmo por ano

ou seja 2013 todos os registos que estejam inseridos na base de dados vão aparecer mas os registos não devem conter aqueles que foram já identificados com "Arquivo de processo" na tabela "eventos">"medidas">"tipodemedidas".

Pensei eu que iria ser facil pois isto e um trabalho de estágio e já so tenho hj e amanha de manha para cabar e so falta este critério para aplicar em todas as consultas que tenham relatórios e criar uma consulta de cruzada que tem como base fazer os tipos de medidas por grupo de idades ou seja na minha cabeça pensei em fazer uma consulta para cada grupo e depois cruzar todas as consultas com os tipos de problema mas nao esta a funcionar

estou a desesperar e como só tenho 3/4 semanas de access ainda pior. Dai ser um bocado "lerdo" nestas coisas mas como tudo na vida temos de aprender para saber

o que queria fazer era o mais simples posivel pois esta base de dados nao vai ser utilizada por mim vai ser utilizada numa empresa e os funcionários da mesma não pescam muito de compudadores.

denovo obirgada
Daniel ferreira

O estágio devia ser feito por si. Assim, está-se a enganar a si mesmo.
Abra uma consulta em modo SQL e cole
SELECT Freguesias.NomeFreguesia, Count(Eventos.idEvento) AS ContarDeIdEvento
FROM (Freguesias LEFT JOIN Processos ON Freguesias.NomeFreguesia = Processos.NomeFreguesia) LEFT JOIN (Eventos LEFT JOIN Medidas ON Eventos.IdEvento = Medidas.IdEvento) ON Processos.idProcesso = Eventos.idProcesso
WHERE (((Year([Eventos].[Data])) In ([Introduza o ano],[Introduza o ano]-1,[Introduza o ano]-2)) AND ((Medidas.TipoDeMedida)<>'Arquivo do Processo'))
GROUP BY Freguesias.NomeFreguesia;
Está a filtrar pelo ano introduzido e pelos 2 anos anteriores e que o TipoDeMedida seja diferente de 'Arquivo do Processo'
É isto que pretende?

Sim era isso que pretendia agora e que vi que já tinha posto
sim mas quando me encarrego de me comprometer a fazer uma coisa tento fazer e alias assim consigo estudar o codigo e aprender a fazer numa procima



Muito obrigada

Se tiver resolvido, pressione o botão Resolvido

a expreção está a funcionar ele conta os ultimos anos etc mas se eu puser o "idevento" nos totais como agrupar por ele mostra 1 registo (que está correcto) mas se puser no contar ele conta 2 ou seja conta o que está bem e o que está mal

Não percebi. Descreva com texto estruturado

Esqueca já consegui resolver nao era "eventos"."data" mas sim "processos"."AnoAbertura"

Resolvido Obrigada a todos