Botão fechar relatório pela Ribbon
Adquira a assinatura vitalícia do site e passe a ter acesso aos arquivos exemplos, vídeos, revistas, livros e ao kit de montagem de ribbons. Você terá suporte por e-mail, caso necessite tirar dúvidas pontuais. Clique AQUI e veja como obter um dos nossos planos. Clique AQUI e faça uma visita a seção Downloads do site e verifique as centenas de arquivos que estará à sua disposição. Clique AQUI e faça uma visita a seção Vídeos do site e veja a lista que estará disponível ao se tornar o nosso assinante vitalício. Clique AQUI e saiba mais detalhes sobre o kit de montagem de ribbons (deixe seus aplicativos com aspecto profissional).
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.
| Não há comentário |
