[Resolvido]Relatório com dados empilhados que oculte os campos sem preenchimento

Boa tarde,

Passei a manhã à procura de uma solução entre os tópicos do fórum, mas sem sucesso. Trata-se de um detalhe que muitos programas resolvem (tais como os que fazem impressões em série) mas o Acces (aparentemente) não.

Tenho de apresentar um relatório onde mostro o resumo da ficha biográfica de algumas pessoas. Como nem todas as pessoas têm as mesma características, pretende-se que os campos não usados (sem valor algum ou com "não se aplica") não apareçam no relatório.

Não sei se estou a ser bem claro, por isso deixo aqui algumas imagens.

http://dl.dropbox.com/u/3928393/Relatorio_agora.JPG
http://dl.dropbox.com/u/3928393/Relatorio_bom.JPG
http://dl.dropbox.com/u/3928393/Relatorio_ideal.JPG

Agradeço desde já a quem possa ajudar.

Um abraço
António

Na verdade, o Access costuma tomar conta disso por si só. Geralmente ele esconde os campos não visíveis automaticamente. Mas uma ideia pode ser você retirar os labels e buscar os dados diretamente da tabela, acrescentando o label no próprio campo, colocando na origem do mesmo:

= "Nome: " & NomeDaTabela.NomeDoCampo

Seja bem vindo ao Maximo!
Pode no relatório, por padrão deixar os campos em questão com a propriedade Visivel = Não

No evento Ao Formatar do relatório aplique:

If Not SeuCampo = "" Then
Me!SeuCampo.Visible = True
End If

Obrigado aos dois pela resposta tão célere.

criquio: não entendo quando diz que o Access já faz isso. Onde? Quando? Não vi. Quanto à sua sugestão parece-me simples, daquelas que só podem funcionar... por isso não entendo porque não funcionou comigo. Deu erro.

Dilson: a sua proposta também me parece boa. Mas não funcionou, penso que talvez por burrice minha: nem sei encontrar o evento "Ao formatar" de que me fala (será que no português de Portugal tem outro nome?). Experimentei noutros... sem sucesso.

Até já
António

Você deixou o relatório normalmente vinculado e colocou o que eu passei dentro do campo como se estivesse digitando dentro de um rótulo?

= "Nome: " & [NomeDaTabela].[NomeDoCampo]

Exacto. Na "origem do controlo", onde tinha TituloNobl escrevi ="Título nobliárquico: " & [BIOGRAFIAS].[TituloNobl].

Vamos tentar com o DLookup para verificar se tem algo no campo. Se o campo for nulo na tabela, não coloca nada, caso contrário, coloca o rótulo e o dado do campo da tabela no campo do relatório:

=SeImed(IsNull(DLookup("NomeCampoDaTabela";"NomeDaTabela";"Código=" & [Código]));"";"Rótulo Nome: " & DLookup("NomeCampoDaTabela";"NomeDaTabela";"Código=" & [Código]))

Fiz como disse:

=Selmed(ÉNulo(DPesquisar("TituloNobl";"BIOGRAFIAS";"Código=" & [Código]));"";"Título nobiliárquico: " & DPesquisar("TituloNobl";"BIOGRAFIAS ";"Código=" & [Código]))

O Access estranha o Selmed e o Código - o resultado é #Erro.

Por curiosidade experimentei a fórmula num formulário e também deu erro.

A ID da sua tabela se chama Código mesmo? Quando colocamos Código, nos referimos ao campo chave primária da tabela. Precisa colocar o nome correto desse campo.

Peço desculpa, não sabia. Agora a minha fórmula está assim:

=Selmed(ÉNulo(DPesquisar("TituloNobl";"BIOGRAFIAS";"CodBio=" & [CodBio]));"";"Título nobiliárquico: " & DPesquisar("TituloNobl";"BIOGRAFIAS ";" CodBio=" & [CodBio]))

... mas o resultado infelizmente é o mesmo. Erro.

No seu campo você colocou DLookup e ele virou DPesquisar mesmo, como R no final? Aqui ele fica sem o R. Tente aí.

Voltei a testar e fica mesmo "Dpesquisar". Mesmo assim experimentei sem o R. Tudo igual.

Bom dia a todos.
Já passei por uma necessidade parecida e um amigo do forum ajudou.
Veja se isso resolve as suas necessidades ou lhe amplia o horizonte.
Vá nesse endereço do site e baixe o exemplo de ajuda onde diz " Clique aqui e baixe o bd"
http://maximoaccess.forumeiros.com/t3460-resolvidoescolha-num-relatorio
Saudações tricolores.

Boa noite, António

À primeira vista, parece-me ser possível trabalhar, através de DAO nos dados de origem do relatório, e criar uma tabela auxiliar para que o relatório seja criado a partir desta tabela auxiliar.
Se ainda não tiver resolvido, indique todos os dados envolvidos (nome de tabela(s) e nomes e tipos de campos)

O amigo deve estar fazendo algo diferente, pois eu já usei conforme passei acima, com o DLookup, e sempre funcionou. Caso queria, coloque uma cópia do banco seguindo as dicas da minha assinatura abaixo ↓↓↓

Boa noite. Vocês são excelentes. Obrigado.

Não posso experimentar as últimas dicas(do Mylton, Alexandre e criquio) hoje porque me surgiu uma outra emergência. Amanhã, se tudo correr bem, volto aqui e ensaio tudo, inclusive tento colocar aqui o meu "banco de dados" como sugere criquio.

Um grande abraço.
António

Boa noite.

Estou de volta ao meu problema com os campos vazios, nos relatórios. Tentei seguir os conselhos que alguns colegas aqui deixaram mas infelizmente não consegui.

Seguindo o conselho do criquio, deixo aqui o link para a Base de Dados, no Dropbox:

http://dl.dropbox.com/u/3928393/BD_Pro_MaximoAccess.zip

Alexandre, sou mesmo novato, não sei o que possa ser um DAO (data access object)...

Um abraço
António

Boa noite, António

Deu muito mais trabalho do que pensava e, mesmo assim, não consegui trabalhar o campo Foto nem o campo ADMIN (por ter caixa de combinação por origem do campo)
Criei uma tabela auxiliar para passar os dados trabalhados (BiografiaParaRelatorio). Para preencher esta tabela, execute o código do módulo4

Veja aqui
http://dl.dropbox.com/u/24017093/BD_Pro_MaximoAccess.accdb

No relatório, tenha caixas de texto; duas para cada campo: uma para mostrar o nome do campo e outra para mostrar o conteúdo do campo. Ou seja, no relatório preencha
NomeCampo1, ValorCampo1
NomeCampo2, ValorCampo2
NomeCampo3, ValorCampo3
NomeCampo4, ValorCampo4
...
Assim terá os dados preenchidos nas primeiras linhas.
Para preencher o nome do agrupamento dos dados, tem de completar o preenchimento seguindo a lógica

Bem... isto está difícil.

Mostrei a solução do Alexandre ao proprietário da BD mas ele nem abdica da foto nem lhe agradou termos de replicar a tabela (em [BiografiasParaRelatorio]...

Não sei o que mais experimentar.

Em todo o caso agradeço a todos quantos tentaram ajudar.

Um abraço
AL

Sobre a fotografia, não precisa abdicar dela. Depois de ter a tabela auxiliar preparada, cria-se a origem dos registos através de origem combinada entre as duas tabelas em que o campo foto vem da 1ª tabela e os restantes dados da 2ª

A expressão escrita pelo Criquio executou perfeitamente.

Precisei apenas fazer uma manobra com outro campo, para que a cor do rótulo ficasse como as demais.

Veja o Relatório1 funcionando:

http://speedy.sh/xGVYp/Report-AntonioLeite.rar

Dilson, criquio, Alexandre, Mylton... muito obrigado a todos pela ajuda.

Percebi bem que a dificuldade não era tão banal quanto parecia mas vocês são craques, têm o espírito curioso e acabaram por conseguir.

Estou a repercutir os códigos na base e está a funcionar perfeitamente. É verdade que tudo isto torna a visualização algo lenta (demora mais de um minuto a mostrar/ocultar todos os campos) mas vou colocar uma pesquisa parametrizada para reduzir o número de registos a apresentar.

Obrigado uma vez mais a todos.

Abraço

António

Tinha fechado o tópico mas reabri.

Surgiu um pormenor: esta expressão não é exclusiva para os relatórios, exacto? Nesse caso deveria funcionar no subformulário que estou a colocar dentro do relatório. Porque é que não funciona?? E se o meu campo for uma data? (difícil lidar com dados nulos...)

António