Banned
|
Ajuda - Programação VBA/Excel
11-09-07, 14:04
#1
Prezado amigos programadores .. hehehhe. então seguinte, tenho uma planilha que dentro dela há muitas outras planilhas, queria fazer o seguinte, na primeira planilha colocar um ListBox, que contenha o nome de todas as outras planilhas, e quando se clicasse no nome abriria a planilha então clicada.
Já fiz assim , em uma coluna coloquei o nome de todas as planilhas , dae fiz um ListBox e blz , já esta lá do jeito que eu quero com o nome de todas as outras, isto funcionará como indice na verdade, agora preciso saber qual é a programaçao que eu coloco no VB para isto funcionar, tipo clicando na setinha , eu desço ate "Plan1" por exemplo , dae clicasse e iria direto pra ela , como se fosse um hyperlink. Alguem sabe qual é a programação para isso?? Help Please!! |
||||
Trooper
|
11-09-07, 14:23
#2
http://www.google.com/search?q=listb...ient=firefox-a
achou várias coisas.. mas como não entendo o assunto |
Trooper
|
11-09-07, 14:27
#3
então, ja fiz isso uma vez, desenvolvi uma planilha com vba para usar lá no meu antigo trampo, mas era um pouco diferente, não estava em ListBox, esta como botões, quando clicava, ele abria a planilha,
mas faz mais de 01 ano que não funçu em vba, add meu msn que ti passo a planilha eltonsaraiva @ hotmail.cm |
Banned
|
11-09-07, 14:37
#4
Quote:
Ps.: Não achei nada q presta no google , nem no Baboo. |
|
Trooper
|
12-09-07, 17:14
#5
Já viu o HELP do vba? (Já me ajudou bastante )
|
Trooper
|
12-09-07, 17:19
#6
creio eu que seja algo do tipo objeto.selected...
sei lá |
Trooper
|
12-09-07, 20:24
#7
Então, qdo vc faz um ListBox cada item da caixa recebe uma numeração.
Essa numeração é Vínculada a uma célula do Excel, exemplo: A24 O que vc precisa fazer agora é criar um SELECT CASE. Passo a passo: Exibir > Barra de Ferramentas > Formularios > Caixa de Listagem - Botão direito sobre a Caixa de Listagem - Formatar Controle > Aba Controle - Define o intervalo e o vinculo - Botão direito sobre a Caixa de Listagem - Atribuir macro aqui ficou assim: Sub Dropdown4_Alteração() Dim x As Integer x = Range("A24").Value Select Case x Case 1 Sheets("NomeDaPlanilha").Select Case 2 Sheets("NomeDaPlanilha").Select . . . ' vai até o número de planilhas q vc tiver... Case Else Exit Sub End Select End Sub Uma dica, deixe o primeiro item da listagem em branco... ele será o CASE 1 e vc deixa sem funcionalidade... Vc tb pode fazer diferente... cria um botão chamado "IR" ao lado da lista. Programa ele para armazenar o número do item da lista e ao clicar ele vai direto... a programação é identica ao de cima.. porém serão 2 cliques... 1 para escolher o item, outro para IR. Vc escolhe. Abç. Last edited by mago; 12-09-07 at 20:31.. |
Trooper
|
12-09-07, 22:09
#8
Olha cara, eu ja fiz vaaarios sisteminhas com VBA.
Vc vai ter q jogar o listbos la, popular ele com o nome CERTO de cada planilha. Vc pode por um FOR pra pegar o nome de cada planilha e adicionar no listbox. Entao.... Qd popular o listbox vc vai ter q botar uns IF's, CASE ou qlqer q seja o metodo, para qd escolher tal nome, ele vai mandar um WorkBook(Variavelcomnomedaplanilha).Active ti´po isso! nao faco 100% pra vc pq to sem tempo. grande abraço |
|
|