Botão da ribbon está fechando o Access
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.
Usuário Marcos:
Avelino, bom dia.
Talvez você saiba o que pode estar acontecendo. Se eu abrir o formulário fora da ribbon, ele abre normalmente, mas quando tendo abri-lo pela ribbon, o Microsoft Access é encerrado automaticamente, sem qualquer mensagem, antes mesmo de entrar no mod_ribbon. Você tem alguma idéia do que pode estar acontecendo?
Agradeço por mais essa grande ajuda.
Suporte:
Marcos,
qual o código usado pelo botão da ribbon? Um simples Docmd.OpenForm?
Usuário Marcos:
Sim, um simples OpenForm.
Analisando melhor, percebi que quando entro no projeto, através do frmLogin (o mesmo do Maestro) é que ocorre o fato. Se entrar pulando o frmLogin, o formulário abre normalmente.
O problema dá apenas em alguns formulários, em outros o funcionamento é normal.
Não consegui descobrir o porquê, mas quando clico no tal formulário, ele vai para o código abaixo. Eu inibi a execução e agora está abrindo o formulário normalmente, mas não sei a conseqüência dessa inibição, ainda estou testando.
Private Sub Form_Close()
' On Error Resume Next
'If nlogoff = False Then Exit Sub
'rslista.Close
'Set rslista = Nothing
'Set bdlista = Nothing
'If Not booNovoVinculo Then DoCmd.Quit
End Sub
O código acima está no frmLogin, como disse, não consegui descobrir o porquê de alguns formulários entrarem aí.
Suporte:
Marcos,
de fato quando se fecha o formulário de login (frmLogin), o aplicativo se fecha. Por acaso, você está usando a função fncFechaForms(), lá no código do botão da ribbon? Se sim, utilize assim: fncFechaForms(true)
Analise o código e observe os comentários.
Faça o login aqui para ter acesso ao código.
Usuário Marcos:
Era isso mesmo, nada como o conhecimento.
Obrigado por mais essa grande ajuda.
Abraço!
Não há comentário |