Bom dia, Pessoal.

Question

Estou quebrando a cabeça com meu UserForm gente, eu uso o seguinte código para deixar a planilha oculta: Application.Visible =False e : Application.Visible =True.

Mas o excel oculta todos os documentos excel que estejam abertos no computador poderiam me ajudar ?

e depois ele da um bug que mesmo com o formulário fechado, ele fica aberto mas oculto, oque eu faço ?

  

Answer 1

Douglas Jesus.01,

   Por favor, veja se esse código ajuda:

============================================
Ocultar Planilha e deixar somente o Userform

Sub Minimizar()
    'Dim w As Window
    'For Each w In Windows
    '    If w.Visible Then w.WindowState = xlMinimized
    '    Next w
End Sub

'Application.WindowState = xlMinimized
'ou
'createobject("shell.application").minimizeall

Application.Windows("NomePastaTrabalho").Visible= True/False ' True/False = True ou False

https://gurudoexcel.com/forum/viewtopic.php?f=12&t=3361&p=16762#p16762
============================================
Show or Hide|Unload a userform

https://analysistabs.com/excel-vba/show-hide-unload-userform/
============================================

[]'s,
Fabio I.

Answer 2

Douglas,

apenas um esclarecimento. Se você diz "Ocultar Planilha", entende-se que você quer ocultar uma determinada Aba. Sendo assim, o comando correto é:

Sheets("Plan1").Visible = xlSheetHidden
ou
Sheets("Plan1").Visible = xlSheetVisible
ou
Sheets("Plan1").Visible = xlSheetVeryHidden

Quando você utiliza:

Application.Visible = False

na verdade você está ocultando todo o Excel.

Você também tem a opção de ocultar um determinado arquivo aberto, que chamamos de "Pasta de Trabalho". Neste caso você utilizaria:

Application.Windows("Pasta1").Visible = False

Resumindo, você possui basicamente 3 níveis para decidir o que ocultar.

Abraço.

---

Filipe Magno

Answer 3

Douglas Jesus.01,

   Por favor, faça outro post e se possível coloque um título mais claro para que outras pessoas possam entender.

Obrigado pelo voto!

[]'s,
Fabio I.