Notifications
Clear all

Como chamar evento por string?

7 Posts
4 Usuários
0 Reactions
1,451 Visualizações
(@wilker12)
Posts: 36
Eminent Member
Topic starter
 

Olá,

Como posso chamar um evento por string? Mais ou menos assim: Var = "ComboBox1_Change": Call Var

Grato, Wilker.

 
Postado : 09/07/2018 7:03 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Não entendi sua intenção!!

Var= "ComboBox1_Change" vc so esta atribuindo o texto "ComboBox1_Change" na varialvel Var

Explica melhor sua necessidade.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 09/07/2018 7:39 pm
(@wilker12)
Posts: 36
Eminent Member
Topic starter
 

Sim. Na verdade são vários combobox chamados por uma função através do seu índice. Aí fica Var = "ComboBox" & indice & "_Change".
Só existe o Call pra se chamar um evento?

 
Postado : 09/07/2018 7:49 pm
(@wilker12)
Posts: 36
Eminent Member
Topic starter
 

Achei, Marcelo, é Application.Run "Planilha1.ComboBox1_Change"
O problema é que "Planilha1" é o nome interno da planilha, não o nome real que eu dei. Sabe como informo o nome que renomeei? Grato.

 
Postado : 09/07/2018 8:19 pm
gfranco
(@wzxnet7)
Posts: 653
Honorable Member
 

Bom dia.
Postagem cruzada em:
https://www.gurudoexcel.com/forum/viewtopic.php?f=12&t=7295

Resposta útil? Clique na mãozinha ao lado do botão Citar.

 
Postado : 10/07/2018 2:39 am
EdsonBR
(@edsonbr)
Posts: 1057
Noble Member
 

Bom dia, Wilker12

O problema é que "Planilha1" é o nome interno da planilha, não o nome real que eu dei.

Use então:

Application.Run Worksheets("Nome Real da Planilha").CodeName & ".ComboBox" & indice & "_Change"

E lembre-se também de trocar Private por Public no código do evento Change do seu ComboBox caso esse seu código esteja num módulo normal.
Se estiver no mesmo módulo da classe da planilha, pode deixar o Private e também pode usar Me.CodeName & ".ComboBox" & indice & "_Change"

 
Postado : 10/07/2018 8:58 am
(@wilker12)
Posts: 36
Eminent Member
Topic starter
 

Que isso! Na cabeça!!
Valeu, Edson!

 
Postado : 10/07/2018 3:28 pm