Página 1 de 1

Desabilitar Eventos em Formulários

Enviado: 01 Set 2019 às 15:52
por Falcao98
Bom dia!

Pessoal, estou com o seguinte problema: Estou trabalhando em um sisteminha simples de cadastro, porém a propriedade "Application.EnableEvents = False" parece não funcionar dentro do formulário, mesmo eu a colocando antes de mudar o valor da ComboBox, o evento "Change" é disparado. Meu código está da seguinte forma:

Private Sub UserForm_Activate()
Application.EnableEvents = False

With frmProd
.cmbCod = Sheets("Produtos").Range("A1048576").End(xlUp).Value + 1 (Aqui o evento Change é disparado, mesmo com a propriedade EnableEvents estando em False)
.cmbMarca.RowSource = "_Marcas"
.cmbMarca = "Selecione uma marca"
.cmbUnidade = "Selecione uma Unidade"
.cmbUnidade.RowSource = "_UNIDADE_VENDA"
.btAlterar.Visible = False
.btExcluir.Visible = False
End With

Application.EnableEvents = False

End sub

Como faço para desabilitar os eventos no formulário quando algum valor é inserido na combo?
Já vasculhei a internet e não encontrei nada, se alguém puder dar uma força aí, vlw

Re: Desabilitar Eventos em Formulários

Enviado: 01 Set 2019 às 16:42
por eduardogrigull
Aqui está funcionando normalmente... Voce já tentou por esse codigo no evento Initializate ao invés de Activate? E está como "False" lá embaixo no seu código... Tenta anexar uma planilha só com o formulário caso persista o erro...

Re: Desabilitar Eventos em Formulários

Enviado: 01 Set 2019 às 17:24
por Falcao98
Segue anexo planilha com o formulário. Depurando você consegue ver que mesmo depois de executar a propriedade "Application.EnableEvents = False", ele chama o Evento Change.

Re: Desabilitar Eventos em Formulários

Enviado: 02 Set 2019 às 14:06
por eduardogrigull
Pelos rápidos testes, percebi que o EnableEvents só funciona fora da area de userforms. Resolvi criando uma variável bem simples, que voce poe no evento Change do TextBox...
Veja se resolve

Desabilitar Eventos em Formulários

Enviado: 08 Set 2019 às 12:58
por Falcao98
Boa!!
Me ajudou bastante vlw

Desabilitar Eventos em Formulários

Enviado: 08 Set 2019 às 13:59
por eduardogrigull
Não se esqueça de marcar o tópico como resolvido, caso tenha sido resolvido, e clicar em obrigado caso tenha ajudado!