Home Excel - Dicas Microsoft Excel VBA Excel VBA - Navegacao pelas planilhas Excel planiha vba worksheet navegar menu personalizado

Excel planiha vba worksheet navegar menu personalizado

E-mail Imprimir PDF

Saberexcel - o site das macros

Essas macros do Aplicativo Microsoft Excel VBA, tem por objetivo inserir um ítem de menu para navegação pelas folhas de planilhas, o objeto inserido pelo procedimento é uma combobox relacionando todas as folhas de planilhas contidas no livro. Podem observar que usei o Evento auto_open para execução da macro na abertura do livro e auto_close() para deleção do menu personalizado no fechamento do livro


Essa macro insere uma barra de menu na forma de uma combobox para navegação pelas folhas de planilhas, usando o evento auto_open,
para montar o menu na abertura do livro.
Sub auto_open()
On Error Resume Next
CommandBars("Barra_Planilhas").Delete

Set vBarra = CommandBars.Add
vBarra.Name = "Barra_Planilhas"
vBarra.Visible = True

Set Menu = vBarra.Controls.Add(msoControlComboBox)

For i = 1 To Sheets.Count
Menu.AddItem Sheets(i).Name
Next

Menu.OnAction = "Navega_Plan"
Menu.Text = "Seleciona Planilha"
End Sub

'macro usando o evento auto_close para deleção do menu personalizado (Barra_Planilhas) ao fechar o livro.
Sub auto_close()
On Error Resume Next
CommandBars("Barra_Planilhas").Delete
End Sub

'macro que selecionará a folha de planilha desejada na lista da combobox no menuzinho personalizado. (veja imagem acima.)
Sub Navega_Plan()
Sheets(CommandBars("Barra_Planilhas").Controls(1).Text).Select
End Sub

'Essa macro é um (volta Principal) inserido em todas as folhas de planilha, quero que observe para um detalhe importante,
'aqui referenciamos a folha de planilha Principal, não pelo nome da folha de Planilha mas pela "FOLHA DE CÓDIGO DA FOLHA DE PLANILHA PRINCIPAL", o porque?,
R: se o usuário mudar o nome da folha de planilha lá na aba de planilha a macro vai funcionar, por estar referenciando à folha de código, ao contrário, isto é, se fosse pelo nome da folha de planilha Sheets("Principal").Select - (resultaria em erro, se o usuário mudassee o nome da folha de planilha) . entendeu?

Sub voltar()
sbPrincipal.Select ' planilha referenciada pelo nome da folha de código.
End Sub




Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA (Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos SaberExcel




   Baixe o exemplo de planilha contendo as macros acima
vba navegar planilhas menu personalizado (153.64 kB)



Publicidade
Compre com segurança, garantia e ótimos preços
Eletrônicos - Submarino.com.br

Última atualização em Dom, 14 de Agosto de 2011 07:13  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

PROMOÇÃO DIDÁTICOS SABEREXCEL



Adquira já o Acesso Imediato
à Area de Membros

Compra Grantida --- Entrega Imediata

Aprenda Excel VBA com Simplicidade de 
códigos e Eficácia, Escrevendo Menos e
Fazendo Mais.

'-------------------------------------'
Entrega Imediata:
+  500 Video Aulas MS Excel VBA
+  35.000 Planilhas Excel e VBA
+  Coleção 25.000 Macros MS Excel VBA
+  141 Planilhas Instruções Loops
+  341 Planilhas WorksheetFunctions(VBA)
+    04 Módulos Como Fazer Excel VBA
+  Curso Completo MS Excel VBA
+  Planilhas Inteligentes


Pesquisa Google SaberExcel

Publicidade Google

<script type="text/javascript"><!--

google_ad_client = "ca-pub-2317234650173689";

/* retangulo 336 x 280 */

google_ad_slot = "0315083363";

google_ad_width = 336;

google_ad_height = 280;

//-->

</script>

<script type="text/javascript"

src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

</script>

Publicidade

RSFirewallProtected


Google Associados

Depoimentos

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA