Notifications
Clear all

Abrir somente o Userform, mais não fechar outras planilhas.

21 Posts
3 Usuários
0 Reactions
5,066 Visualizações
(@edantasrj)
Posts: 14
Active Member
Topic starter
 

Boa noite!
Gostaria de saber se existe alguma forma de no meu aplicativo feito em Excel somente fosse apresentado o userform.
No meu caso eu até já consegui fazer isso, mais quando abro meu aplicativo fecha todas as planilhas. Gostaria de um código que somente fizesse referencia ao meu aplicativo. E quando clicar no botão fechar somente fechasse o aplicativo.

Segue exemplo do meu plicativo.

 
Postado : 01/04/2013 3:36 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

edantasrj,

Boa Noite!

Veja se assim lhe atende.

 
Postado : 01/04/2013 6:26 pm
(@edantasrj)
Posts: 14
Active Member
Topic starter
 

Olá Wagner Morel,
Não consegui visualizar sua resposta.
O meu objetivo é fazer com que o userform não interfira em outras planilhas que estejam abertas ou que possam ser abertas depois que o meu userform for aberto.

Desde já agradeço

 
Postado : 01/04/2013 9:50 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

edantasrj,

O Seu arquivo eu já fiz e só agora é que estou vendo que o mesmo não foi anexado a mensagem que lhe enviei. Muito provavelmente porque o tamanho deve ter ultrapassado os 500 KB permitidos pelo site.

A solução está no arquivo que ficou no meu notebook em casa. Assim, tão logo eu cheque em casa Pa noite, envio o arquivo para você, compactado em pedaçõs menores, pois o compactador que tem aqui na empresa não permite quebrar o arquivo.

 
Postado : 02/04/2013 5:24 am
(@edantasrj)
Posts: 14
Active Member
Topic starter
 

Ok!
Estarei aguardando ansioso o resultado.
Mais uma vez agradeço, sua pré disposição em ajudar.

 
Postado : 02/04/2013 9:57 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

edantasrj,

Boa Noite!

Segue o seu arquivo compactado em duas partes.

 
Postado : 02/04/2013 3:34 pm
(@edantasrj)
Posts: 14
Active Member
Topic starter
 

Wagner Morel,

Bom dia!

A planilha não esta funcionando corretamente. Esta travando e aparecendo um erro que não foi possível carregar a DLL.
Obs. Eu alterei alguns códigos e até consegui fazer com que ela não interferisse na execução das demais aplicações ou trabalhos em excel, mais somente os que forem abertos posteriormente a ela. Os que são abertos antes, ficam travados como se o meu aplicativo bloqueasse.Há, e o arquivo que alterei foi o meu, pois o que vc me enviou esta dando erro de DLL e não aparece nada.
Não sei se interfere, mais meu sistema operacional é o XP.

Grato mais uma vez pela ajuda.

 
Postado : 02/04/2013 10:16 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

edantasrj,

Bom Dia!

Bem... não sei dizer se o fato do sistema operacional ser o XP está causando o tipo de erro que você se refere. Muito provavelmente, sim! Pode ser que eu esteja utilizando alguma DLL cuja versão seja própria do Windows 7, S.O que utilizo. Todavia, não sei dizer ao certo porque eu não fiz alteração radical no projeto que você disponibilizou aqui no fórum. Ou seja, não alterei nenhum objeto do seu projeto que são os responsáveis pelo uso dos arquivos DLL's.

Acabei de testar novamente esse arquivo que enviei para você agora e não deu nenhum problema. A única situação que ainda vi e que esqueci de colocar no arquivo que enviei para você, é que não havia colocado uma constante do VB para que os seus formulário sejam carregados de maneira a permitir que você consiga trabalhar em qualquer outro aplicativo que esteja aberto ou venha a ser aberto (inclusive nas demais planilhas). Essa constante (vbModeles) você deve inserir logo após o método SHOW que carrega cada um dos seuas formulários. Ou seja, você tem algo como Coletores.Show. Acrescente vbModeles para ficar assim Coletores.Show vbModeles. Faça isso para todos os formulários que são carregados.

Quanto às alterações que fiz no seu código, sugiro que você copie cada uma das procedures do arquivo que lhe enviei e cole nos locais apropriados do seu arquivo.

 
Postado : 03/04/2013 4:50 am
(@edantasrj)
Posts: 14
Active Member
Topic starter
 

Caro Wagner Morel,

Baixei o arquivo disponibilizado por você agora no Seven e continua com o mesmo problema.
Acredito que o arquivo possa ter corrompido no momento da compactação ou envio.
Porém conforme informado fiz as alterações no arquivo. Incluir o vbModeles após todos os formulários com final .Show foi me atendido em parte.
Ao abrir a aplicação não é ocultada a tela do Microsoft Excel, abre a aplicação juntamente com ela. Deste modo pode*se fechar a aplicação atrave´s da tela do Microsoft Excel e isso eu não quero. Pretendo que o usuário utilize somente o aplicativo.E caso já tenha ou possa ser aberto algum documento em Excel o mesmo possa ser editado e manuseado.
Segue tela. E também arquivo alterado novamente.

E agradeço sua ajuda mais uma vez.

 
Postado : 03/04/2013 12:15 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

edantasrj,

Boa Noite!

Agora, com o envio da tela, entendi o que você quer dizer!

Acho que agora está como você quer. Baixe os arquivos anexos, descompacte-os e teste. Se por acaso você não conseguir abrir o arquivo, me envie um endereço de e-mail que eu te mandarei por e-mail.

Aqui, nos meus testes, está funcionando 100%.

 
Postado : 03/04/2013 4:50 pm
(@edantasrj)
Posts: 14
Active Member
Topic starter
 

Wagner Morel,

Boa tarde!

Ocorreu o erro abaixo ao tentar abrir, tanto no XP quanto no Seven:
Utilizo o Office 2007 será que isso pode influenciar também.

Muito obrigado pela força.

 
Postado : 04/04/2013 11:11 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

Qual erro? Não veio nenhum arquivo ou tela...

 
Postado : 04/04/2013 1:18 pm
(@edantasrj)
Posts: 14
Active Member
Topic starter
 

Wagner Morel,

Enviando novamente imagem e anexo da mesma.

 
Postado : 04/04/2013 1:35 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

É amigo... então, sinto muito! Não há mais nada que eu possa fazer para te ajudar! Esse sim, é um erro típico de falta de DLL. Veja no menu ferramentas/Referências, no VBA, se tem algum ítem como AUSENTE.

Como disse, aqui está funcionando muito bem.

 
Postado : 04/04/2013 3:42 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

É amigo... então, sinto muito! Não há mais nada que eu possa fazer para te ajudar! Esse sim, é um erro típico de falta de DLL. Veja no menu ferramentas/Referências, no VBA, se tem algum ítem como AUSENTE.

Como disse, aqui está funcionando muito bem.

Colegas, testei aqui com o office 2007 os arquivos que o Wagner anexou e apareceu a mesma msg e abre a tela para Depuração conforme a figura anexada anteriormente, o estranho para mim foi que apesar da tela do VBA estar aberta, quando fui olhar as Referencias pede senha como se o projeto estivesse protegido, esta não entendi. Wagner por um acaso você chegou a definir alguma Senha para o Projeto ?

Mas independente desta solicitação o VBA continua aberto, então por dedução Declarei a Variavel "wk" que está na rotina Open do Workbook :
Dim wk As Workbook

e funcionou sem dar erro quando se inicia o form, mas volta a dar o erro quando fechamos, e mais uma vez acrescentei no evento UserForm_Initialize do form a declaração da variavel conforme acima e não tive mais o erro.

Agora só fiquei intrigado com esta solicitação de senha.

[]s

 
Postado : 04/04/2013 5:26 pm
Página 1 / 2