Notifications
Clear all

Menu de Planilha em Macro

7 Posts
3 Usuários
0 Reactions
1,563 Visualizações
(@marco_av)
Posts: 0
New Member
Topic starter
 

Olá pessoal,

Sou novo aqui, me desculpem se burlei alguma regra do fórum.
Procurei tópicos parecidos antes de postar, porém só encontrei um que tinha sido removido..

Estou elaborando uma aba "Menu" para dinamizar uma planilha que utilizo. Funcionaria da tal forma: coloquei vários botões que liberam as abas ocultas por meio de Macro (Não fiz por código, apenas mostrando o caminho para tal - Gravar Macro). Depois disso, o que queria fazer, era ocultar automaticamente essa aba que foi aberta quando o usuário mudasse de aba.
Como essa planilha tem muitas abas, queria saber também, se é possível fazer um código para todas as abas (exceto a menu) sem precisar ficar colocando o nome da planilha no código.

Obrigado pela ajuda!!

 
Postado : 11/05/2015 1:22 pm
(@marco_av)
Posts: 0
New Member
Topic starter
 

Alguém?

 
Postado : 18/05/2015 5:37 am
(@gtsalikis)
Posts: 2373
Noble Member
 

É possível, mas... sugiro que vc personalize o menu.

Procure por personalizar ribbon, comece pelos links abaixo:

http://www.exceldoseujeito.com.br/2011/ ... as-macros/
http://www.xtremevbtalk.com/showthread.php?t=265636
http://daquidaparvonia.blogspot.com.br/ ... excel.html
http://www.microsoftexcel.com.br/index. ... otoes.html

Abs

 
Postado : 18/05/2015 1:02 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

No tópico abaixo tem a opção deusar hyperlink em vez de botões, veja se ajuda ;

um hiperlink no excel para uma planilha oculta
viewtopic.php?f=10&t=15681

[]s

 
Postado : 18/05/2015 5:24 pm
(@marco_av)
Posts: 0
New Member
Topic starter
 

Achei interessante.. Fica mais leve até.
Sabe dizer qual código utilizaria se quisesse que mais de uma aba, além da principal (menu) ficasse aberta também?

 
Postado : 19/05/2015 6:10 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Achei interessante.. Fica mais leve até.
Sabe dizer qual código utilizaria se quisesse que mais de uma aba, além da principal (menu) ficasse aberta também?

Troque a Rotina por esta e ajuste o nome das abas :

Private Sub Worksheet_Activate()
   
   Dim ws As Excel.Worksheet
   
    For Each ws In ThisWorkbook.Worksheets
   
        If ws.Name <> "MENU" And ws.Name <> "NomeDaOutraAba" Then
            ws.Visible = False
        End If
   
    Next
   
End Sub
 
Postado : 19/05/2015 7:11 am
(@marco_av)
Posts: 0
New Member
Topic starter
 

Agora sim! Vou utilizar pelo hiperlink que não deixa tão pesado!

Obrigado a todos!

 
Postado : 19/05/2015 9:36 am