Logo Hardware.com.br
Jobert Lúcio
Jobert Lúcio Novo Membro Registrado
1 Mensagem 0 Curtidas

Executar VBA (EXCEL) sem que feche e permaneçam editaveis outras planilhas abertas

#1 Por Jobert Lúcio 13/11/2015 - 10:19
Bom dia,

Elaborei um projeto vba para controle de orçamentos da empresa onde trabalho, existe um problema que não estou conseguindo resolver de maneira alguma,
quando executo o PROJETO VBA, todas as planilhas abertas fecham, existe um tópico de um usuário nesse fórum que disponibiliza um código para esse problema:

Public pasta As String
Sub carrega_form()
Load UserForm
UserForm.Show nomodal
End Sub

Private Sub UserForm_Initialize()
pasta = ActiveWindow.Caption
ActiveWindow.Visible = False
End Sub
Private Sub UserForm_Terminate()
Windows(pasta).Visible = True
End Sub

inclusive fiz um teste, ele resolve em partes, mantém as planihas abertas, mas o problema é que elas não ficam editáveis,

Private Sub Workbook_Open()

Application.Visible = False

'MsgBox "MANTENHA O BOTÃO CAPS LOCK LIGADO PARA O CADASTRO!"

FRMcadastro.Show nomodeless

End Sub

esse é o código que uso, queria manter a planilha deste projeto oculta, e continuar com outras planilhas abertas e editáveis.
se alguém puder ajudar nesse código, ficarei muito grato.
© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal