[Resolvido]Visualizar relatorio quando access tiver invisivel

Adicionei em meu projeto o código splash que faz com que na hora de abrir o access oculte a janela do office "Access" e depois deixa invisível, porém quando vou emitir um relatório o sistema esta dando a seguinte mensagem de erro: Titulo do erro: Como ocultar o Access e Mudar o ícone, mensagem de erro: Não há memória livre suficiente para atualizar a exibição. Feche os programas desnecessários e tente novamente. Vale ressaltar que alterei todos os relatórios para Pop-up: sim. Alguém pode me ajudar?

Verifique se não há objetos ocupando a memória. Sempre que abrimos um Recordset ou um Database por exemplo, precisamos fechá-los e liberar a memória após o uso, senão a memória acabará por esgotar, sem contar que as chances de corromper dados aumentam exponencialmente. A dica é simples: sempre que usar Set para instanciar um objeto, utilize Set NomeObjeto = Nothing no final. O Set coloca o objeto na memória e o Set NomeObjeto = Nothing libera a memória. Sempre que usar o Open para abrir um Database ou um Recorset por exemplo, precisa usar o Close para fechar ao final:

Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("NomeTabela")
' Instanciamos um objeto ao qual demos o nome de rs acima utilizando o Set
' e abrimos o Recordset utilizando o OpenRecordset.
' Após o uso, precisamos fechá-los e liberar a memória:
rs.Close
Set rs = Nothing

Usei como exemplo o instanciamento e abertura de um Recordset, mas o mesmo vale para qualquer objeto que for instanciando com o Set e aberto com o Open.

criquio, vc tem um exemplo montado?

Não é questão de exemplo. Você precisa verificar nos módulos do seu aplicativo se falta fechar alguma coisa.

Resolvido, obrigado!

Resolvido.