Visualizar relatórios em Subformulário
Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 5x no Cartão de Crédito.
Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.
A partir da versão 2010 do Microsoft Access é possível exibir relatórios, consultas e tabelas, através de um controle Subformulário. Veja na figura abaixo, um relatório sendo exibido:
Nota: Devemos configurar a propriedade MODO PADRÃO dos relatórios para Visualizar impressão, a fim de que sejam exibidos pelo Subformulário.
Agora, observe a lista de Propriedades do controle Subformulário e note que basta selecionarmos desta lista, o objeto que desejamos visualizar na propriedade Objeto de Origem. Veja ainda que é possível selecionarmos uma consulta ou tabela para que seja exibida pelo Subformulário.
Podemos definir esta propriedade pelo código VBA e tornar possível a troca de objeto em tempo de execução.
'carregando um relatório Me!Filho.SourceObject = "Report.NomeDoRelatório"
'carregando uma consulta
Me!Filho.SourceObject = "Requery.NomeDaConsulta"
'carregando uma tabela Me!Filho.SourceObject = "Table.NomeDaTabela"
'carregando um formulário
Me!Filho.SourceObject = "Form.NomeDoFormulário"
A Listbox do formulário exemplo possui na segunda coluna(oculta), o nome do relatório a ser carregado. Indicamos então, a segunda coluna da Listbox na propriedade SourceObject do controle Subformulário.
Private Sub Lista_AfterUpdate() Me!Filho.SourceObject = Me!Lista.Column(1) Me!rot.Caption = Me!Lista.Column(0) End Sub
Nota: o formato Snepshot foi descontinuado a partir da versão 2010.
Bom estudo!
Os dez artigos mais visitados
MontaRibbons v.7.0 - Assistente completo para criar ribbons no Access
Vídeo - Controle personalizado de Acesso de Usuários
Vídeo - Aprenda sobre filtragens
Vídeo - Segurança máxima, usando o OPEN
Uma ajuda para quem está começando um negócio ou um projeto
Integrando o Access com Servidor MySQL - Introdução
Desabilitando a faixa(ribbon) superior do Access
Vídeo - Programação de relatórios - Parte 1
Como carregar o seu menu sem que ele vá para lista de suplementos
Adquira o kit UsandoAccess e aprenda em alta velocidade
2 comentário(s) William Diovan Mendes Pereira 04/04/2023 08:06:56 gostei... mas como fazer a ListBox ...? só visualizo o relatorio que informei no objeto de origem. Bruno Gordino 15/08/2022 10:37:36 Boa tarde Sr. Avelino Existe maneira de ajustar o Zoom do Relatório à janela do Sub-formulário através do; - DoCmd.RunCommand acCmdFitToWindow - DoCmd.RunCommand acCmdSizeToFit Cumprimentos Bruno Gordino |