Usando Access

... Assinatura do site por 3 anos + Kit MontaRibbons + 3 Livros em PDF + Diversas Revistas (pdf) de brinde, por apenas R$182,00
(podendo parcelar em até 10 vezes no cartão de crédito)...

Clique aqui e obtenha mais detalhes do nosso kit completo e de como comprar.

Botão fechar relatório pela Ribbon

Antes de iniciar a sua leitura, clique aqui e cadastre-se para receber comunicados sobre novos artigos.

Usuário Alessandro:

Bom dia.

Já dei uma procurada e não encontrei o que preciso. Vamos lá!

Tenho um BD em Access 2007, com alguns relatórios e a princípio usei o exemplo que já vem no MontaRibbons para criar a ribbon dos relatórios.  Até aí tudo funcionando às mil maravilhas.  Porém, meu cliente pediu para visualizar o relatório não em modo visualização e sim em modo relatório mesmo. Só que com isso, o botão fechar relatório ficou esmaecido, não funciona.  Criei um DoCmd no mod_ribbon para fechar o relatório, funcionou, mas tenho uns 10 relatórios.

Minha pergunta é: Tem uma maneira de fazer esse processo ficar menor, ou tenho que criar um DoCmd para cada relatório?  Porque dessa forma acho que vai chegar uma hora que o código vai ficar enorme. Teria uma maneira mais simplificada de fechar os relatórios?

Grande abraço e parabéns pelo projeto, o kit que adquiri tem me ajudado muito.

Suporte:

Alessandro, crie o botão fechar na sua ribbon de impressão, chamando por uma função. Exemplo:

<button id="btFechar" 
label="Fechar" 
imageMso="PrintPreviewClose" 
onAction="=fncFechaRpt()" />

Na função fncFechaRpt() utilize a propriedade Screen para identificar o relatório carregado.

Public Function fncFechaRpt()
DoCmd.Close acReport, Screen.ActiveReport.Name
End Function

Para qualquer relatório o botão irá funcionar, esteja ele no Modo Relatório ou Visualizar Impressão.

Usuário Alessandro:

Deu certo! Ficou ótimo!

Agradeço pelo compromisso em responder.

| Home | Vídeos-aulas | Tutoriais | Dicas | Blog | Downloads | Contato | Artigo |