Notifications
Clear all

Manter aberto outras planilhas do excel

4 Posts
3 Usuários
0 Reactions
1,073 Visualizações
(@ceos005)
Posts: 49
Trusted Member
Topic starter
 

Olá,

Montei um sistema utilizando VBA/Excel onde roda um formulário mantendo as planilhas do excel invisíveis.
O problema é que se eu estiver com outro arquivo do excel aberto e for fechar esse sistema, utilizando um botão com o seguinte código 'Application.Quit', todos os arquivos do excel são fechados.
Eu gostaria que fechasse somente essa aplicação.
Não sei se fui claro.

Poderiam me ajudar?

 
Postado : 01/02/2013 12:38 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Não estou muito certo, mas creio que essa "aplicação", deva iniciar em uma "instancia" exclusiva, e ao sair "fechar" somente essa instancia.
de uma olhada nesta tópico no site do Felipe Gualberto (benzadeus) talvez o auxilie http://www.ambienteoffice.com.br/excel/ ... _pelo_vba/

 
Postado : 01/02/2013 1:34 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Use a pesquisa do fórum, eu me lembro que tenho umas 2 postagem a respeito de algo assim...

Talvez seja isso, não??

ActiveWorkbook.Windows(1).Visible = False
Windows("Arquivo.xls").Visible = False 
 'Seu código
Windows("Arquivo.xls").Visible = True 

Att

 
Postado : 01/02/2013 1:40 pm
(@joocta)
Posts: 187
Estimable Member
 

Caro Alexandre,
estou com esse mesmo problema do amigo acima... Aonde devo colocar esse código?
Tenho que fazer assim?

ActiveWorkbook.Windows(1).Visible = False

Windows("Nome da minha planilha.xls").Visible = False
'Seu código
Windows("Nome da minha planilha.xls").Visible = True

Com isso o meu sistema fica invisível e posso abrir outras planilhas?
Att,
Joocta.

 
Postado : 01/02/2013 3:48 pm