[Resolvido]Configurar consulta com colunas horizontais

Olá pessoal!

Criei uma consulta de forma que os dados ficaram armazenados na posição horizontal:

Campos...........|...............Dados..........|
ID....................|...............1..................|
Data.................|.........09/06/11............|
Anotacoes........|............teste................|
Eventos............|..............1...................|
7......................|...................................|
8......................|...........teste.................|
9......................|...................................|
10....................|...................................|
ID....................|...............2..................|
Data.................|.........10/06/11............|
Anotacoes........|............teste................|
Eventos............|..............2...................|
7......................|...................................|
8......................|...........teste.................|
9......................|...........teste.................|
10....................|...................................|

Agora preciso que essa consulta me mostre somente os dados correspondentes a data atual e que oculte os campos vazios. De forma que fique assim:

Campos...........|...............Dados..........|
ID....................|...............2..................|
Data.................|.........10/06/11............|
Anotacoes........|............teste................|
Eventos............|..............2...................|
8......................|...........teste.................|
9......................|...........teste.................|

Alguém sabe como eu faço isso?

Desde já obrigado!

Oh, lupe

Está a proliferar temas, sem necessidade. Assim, cada assunto ficará muito retalhado.
Tem de puxar pela cabeça.
Experimente SELECT * FROM Tabela WHERE CDate(Dados)=Now;

Amigo,
me desculpe!
voce esta com a razão!

Mas quando se é muito leigo no assunto a gente encontra muitas dificuldades.

Ficou assim:

SELECT tblListComp.LEGENDA, tblListComp.DESCRICAO
FROM tblListComp;
SELECT * FROM tblListComp WHERE CDate(DESCRICAO)=Now;

Mas aparece a mensagem:
"Caracteres encontrados após o final da instruçao SQL."

Utilize apenas
SELECT * FROM Tabela WHERE CDate(Dados)=Format(Now,'dd-mm-yyyy');

Deixei somente a linha:
SELECT * FROM tblListComp WHERE CDate(DESCRICAO)=Format(Now,'dd-mm-yyyy');

E agora aparece essa mensagem:
"Uso invalido de 'Nulo'."

Pois é,

Trata-se de converter texto para data. Para ultrapassar, ter-se-ia que trabalhar conversão.
Fuce no código VBA, porque agora não tenho tempo.
Cumprimentos,

A informação foi valiosa Alexandre. O Colega não retornou, seguiu o conselho e deve ter resolvido.

Olá amigo Vieira!

A informação realmente foi valiosa, pois, procurando solução para este problema acabei encontrando para uma outra duvida que havia surgido. Porem, para este problema ainda não encontrei a solução, ja tentei algumas coisas mas sem sucesso. Assim como para um aluno do ensino fundamental não é facil aprender operações de matemática sem a explicação de um bom professor, pra mim também não ta sendo facil.
Pra ser sincero não tinha dado como resolvido esse topico porque estava com a esperança de que alguem que tivesse tempo pudesse me ajudar um pouco mais.

Abraço e sucesso a todos!!!

lupe,

E está à espera que lhe prepare uma bd com dados significativos?
Aqui, apenas ajudamos e damos uma luz. Este fórum não é comercial para fornecimento de serviços!

Alexandre,

a resposta pra sua pergunta é, não...

O que eu quero que voce entenda é que não to te cobrando nada, nem tão pouco estou cobrando do fórum.
E o que eu percebi que não to entendendo é que não somos iguais, não temos os mesmos conceitos e filosofia de vida. Quando eu me proponho a ajudar alguem de alguma forma, eu vou até o fim, até não haver mais duvidas e/ou até aonde os meus modestos conhecimentos me permitem, quando nesse momento tenho a humildade de dizer simples e unicamente:
"Me desculpe! Meus conhecimentos só me permitem te ajudar até aqui. Sucesso!"
Já vai completar 1 ano que sou usuario deste conceituado fórum e até então nunca tive problemas com ninguém. Estou muito triste com essa situação e espero que tenha fim logo.
Pretendo continuar sendo usuario do fórum e de alguma forma contribuir para que o mesmo seja cada vez mais sucesso. Pretendo tambem dentro de alguns anos ter conhecimento suficiente para poder passar a ajudar os usuarios que recorrem ao fórum todos os dias, pois, penso que assim poderei pagar por todas as valiosas ajudas que ja recebi aqui, inclusive as suas. E se eu chegar nesse status, de uma coisa voce pode ter certeza, voce nunca vai me ver dizer:
"Não tenho tempo"

Abraço e sucesso!

O colega tem a dúvida e os dados.
Se pretende que lhe tiremos a dúvida e ainda construir os dados, está no seu direito.
Mas não entendo o voluntarismo referido e não disponibilizar os seus dados para que lhe possamos ajudar.

Olá lupe,

Poderia mostrar a instrução sql dessa consulta assim como está atualmente. Pode ser que compreendamos e saibamos o que fazer para resultar no esperado.

Alexandre,

a unica coisa que eu pretendia era que tirassem as minhas duvidas.
E o unico direito que me dou neste forum é o de abrir tópicos com as minhas duvidas e esperar o tempo que for preciso por uma solução, caso exista.
Me sinto no dever de lhe pedir desculpas pelo mal entendido.
Não parei de estudar VBA conforme voce sugeriu e sei que por mais que demore eu vou encontrar a soluçao para esta duvida. No mesmo dia que eu a encontrar, hospedarei aqui no forum o arquivo do meu BD com a soluçao encontrada, se assim me permitirem.

Sucesso!

Olá Dilson!

No momento esta assim:

SELECT tblListComp.LEGENDA, tblListComp.DESCRICAO
FROM tblListComp;

Abraço!

Ok

Não vejo nessa instrução o campo que contém a data o qual na condição será critério juntamente com o campo que excluirá os nulos, algo mais ou menos assim:

WHERE CampoDataSendoCritério AND CampoQueApareceráValorNulo IS NOT NULL

Dilson,

não deu certo...
eu tirei uma foto da consulta no modo Design e no modo Folha de Dados mas nao to conseguindo hospedar aqui pra voce entender melhor.
eu posso envia-las para o seu email?

Sim, se desejar, pode também mandar o bd, somente com as tabelas e as consultas em questão, retirando os demais objetos, seria bem mais fácil para tentar ajudar

Aguardo.

Dilson,

enviei os arquivos que voce solicitou.

Obrigado!

Amigo, até agora, nada chegou.

veja se mandou para: dilsongti@gmail.com ou dilsonmarcos@hotmail.com.br

Enviei para dilsonmarcos@hotmail.com.br

vou enviar no outro então.

Ok!

Amigo, foi mole retirar os nulos, logo na primeira deu, veja e aplique aí:

SELECT *
FROM tblListComp
WHERE DESCRICAO IS NOT NULL;

Agora a conversão não dará certo, terá que encontrar outro meio para filtrar a data desejada. Isso porque quando se converte é preciso que todos os dados do campo estejam e obedeçam o mesmo formato, que não é o caso aqui. Aqui em uma única coluna (que compreende um campo) tem textos, números simples, datas e assim não tem jeito, lança a conversão e a instrução percebe que no mesmo conjunto há formatos que não satisfazem.

Veja pra melhor você entender eu apliquei a instrução:

SELECT *
FROM tblListComp
WHERE LEGENDA="DATA" AND CDate(DESCRICAO);

E ela converteu e funcionou no perfeito, pois LEGENDA filtrou somente o campo DATA e todas as informações contidas no registro DATA obedecem ao CDate()

Podes aplicar a instrução para eliminar os nulos e através de uma pesquisa por um formulário filtrar a data que deseja.

Dê uma olhada e me diga.

Desconsidere a parte que falei acima:

"Podes aplicar a instrução para eliminar os nulos e através de uma pesquisa por um formulário filtrar a data que deseja."

Pois nem desta forma será possível, pois olhando melhor, vi que a tabela não obedece normalização nenhuma de dados.

Veja sua tabela:


Agora veja os dados que foram inseridos (armazenados)sendo exibidos:


A normalização correta seria um registro possuir vários campos, assim por exemplo:

Os dados: DATA, ANIV, ANOTACOES

Seriam campos da tabela: tblListComp

E o que acontece nesta tabela é que ela possui apenas dois campos: LEGENDA e DESCRICAO

DATA, ANIV, ANOTACOES a que se refere as informações, não são campos e sim dados armazenados referente aos campos LEGENDA e DESCRICAO

Se nesta tabela assim como está tentar filtrar, vai filtrar apenas o campo DATA, pois os demais dados (ANIV, ANOTACOES etc.) não estão no mesmo registro, pertencem a outros registros.

Terá que remodelar esta tabela, estruturando, transformando esses dados em campos da tabela. sendo assim, a tabela tblListComp receberá como campos os dados DATA, ANIV, ANOTACOES e os demais que lá estão, que te proporcionará filtrar pelo campo data e esta ação por vez te trazer todos os registros que obedecem ao filtro.

Amigo,

realmente é com voce disse.

e se eu fizer uma consulta direto da tabela "tblCompromissos" teria como filtrar a data atual e ocultar os campos nulos?

Obrigado!

Olha uma possibilidade:

Na tblCompromissos deixe apenas o campo DATA e ANIV. Em seguida crie uma outra tabela (por exemplo: "tblDetalhesComp") e vincule à tblCompromissos.

A tblDetalhesComp conterá os campos: EVENTOS, ANOTACOES, 8, 9, 10, 11 ... que armazenará os detalhes referente a DATA e ANIV da tblCompromissos.

Dessa forma, os dados para inserção no formulário quanto para visualizar no relatório, se encaixarão tudo em coluna como é o seu desejo.

Analise e experimente.

Valeu Dilson!

vou fazer o que disse e retorno se deu certo.


Abraço!

Isso.

Vai dar certinho.

Depois é só chamar uma consulta com os critérios na data e da eliminação de nulos.

Reparei nome de campo escrito como DATA. Alerto evitar os nomes reservados do access, mude por exemplo para txtDATA ok.

Disponha sempre!

Dilson,

reestruturei a tabela "tblCompromissos" conforme voce sugeriu e criei a "tblDetalhesComp". Fiz a vinculação entre elas e ate ai tudo certo. Porém, na consulta so consegui filtar a data atual, nao consegui eliminar os nulos.

Voce testou essa teoria na pratica e deu certo?

Abraço!

Fala lupe,

Não testei na prática não, só na cabeça mesmo.

no formulário e no subformulario não precisarás aplicar critérios, porque trata-se das inserções.

Precisará aplicar os critérios no relatório. Vá na fonte de registro, quando abrir a QBE vá aplicando na data igual Date() e nos demais campos Negado é Nulo.

Se encontrar dificuldade, podes mandar no email que te dou uma força OK.

Ok amigo!

Entendi...

Então vou quebrar cabeça mais um pouquinho.
Qualquer coisa te mando o email.

Brigadão pela força!

Abraço...