none
Bom dia, Pessoal. RRS feed

  • Pergunta

  • 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 ?

      
    segunda-feira, 17 de setembro de 2018 09:04

Respostas

  • 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.
    • Marcado como Resposta Douglas Jesus.01 segunda-feira, 17 de setembro de 2018 21:05
    segunda-feira, 17 de setembro de 2018 13:29
  • 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

    • Marcado como Resposta Douglas Jesus.01 terça-feira, 18 de setembro de 2018 01:26
    segunda-feira, 17 de setembro de 2018 21:38
  • 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.

    • Marcado como Resposta Douglas Jesus.01 terça-feira, 18 de setembro de 2018 01:27
    terça-feira, 18 de setembro de 2018 01:11

Todas as Respostas

  • 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.
    • Marcado como Resposta Douglas Jesus.01 segunda-feira, 17 de setembro de 2018 21:05
    segunda-feira, 17 de setembro de 2018 13:29
  • 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

    • Marcado como Resposta Douglas Jesus.01 terça-feira, 18 de setembro de 2018 01:26
    segunda-feira, 17 de setembro de 2018 21:38
  • 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.

    • Marcado como Resposta Douglas Jesus.01 terça-feira, 18 de setembro de 2018 01:27
    terça-feira, 18 de setembro de 2018 01:11