Gostaria de pedir sua ajuda se for possível é claro. Estou a mais de três dias procurando um solução para meu projeto VBA que fiz no excel, achei diversas coisas parecidas mas não o que preciso (talvez eu esteja procurando pelas palavras erradas), porém identifiquei que suas planilhas funcionam da forma que preciso. Segue dúvida.
Gostaria de deixar somente o userform do meu programa na tela do usuário, ou seja, utilizando o "applicaton.visible = False", porém caso o usuário necessite trabalhar em outra planilha ao mesmo tempo, no momento que abro qualquer outra planilha que esteja no computador a aplicação do excel fica ativa para todas. É possível deixar somente a aplicação do meu programa invisível? Vi que a planilha do site abaixo funciona dessa forma.
http://cpap.com.br/orlando/XLtoExeMore. ... rlMoreWin1
Antecipadamente agradeço
Boa tarde!!
Tente
Workbooks("NOmeDoArquivo").window(1).hidden = True
Private Sub Workbook_Open()
Application.ScreenUpdating = False
Application.WindowState = xlMinimized
UserForm1.Show 0
End Sub
Private Sub Workbook_Open()
ActiveWindow.WindowState = xlMinimized
Application.Visible = False
UserForm1.Show
End Sub
Leia:
http://stackoverflow.com/questions/1135 ... y-in-excel
Sou, eu , AlexandreVBA
Att
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Alexandre,
A 1ª opção não da certo, pois dá erro de " O objeto não aceita propriedade ou método".
A 2ª opção somente minimiza a janela.
A 3ª opção oculta somente a workbook, e não a aplicação do excel.
A 4ª opção li o fórum mas acho que não se aplica.
Abs
Bom dia!!
na primeira opção se digitar o nome o arquivo errado, não funcionará!!
Workbooks("Qual_É_o_Nome_Do_seu_arquivo?").window(1).hidden = True
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Coloquei o no correto.
Tente o seguinte
Workbooks("NOME_DO_ARQUIVO").Windows(1).Visible = True