Notifications

Clear all

Como chamar evento por string?

VBA & Macros

Post Recente por Wilker12 8 anos atrás

7 Posts

4 Usuários

0 Reactions

1,657 Visualizações

RSS

Wilker12

(@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

(@mprudencio)

Posts: 2731

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

(@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

(@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: 650

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: 1049

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"