Ir ao conteúdo

Problemas com ativação do msgbox


Alan Alonso

Posts recomendados

Postado

Olá pessoal boa tarde.

Seguinte: Gostaria de saber como fazer para que um resultado x na y, fizesse com que automaticamente libera-se uma "msgbox".

Exemplo:

A célula (a10) recebe a soma de (a1:a9);

Eu gostaria que se a célula (a10) tivesse o valor de 100, abrisse de forma automática uma "msgbox" qualquer.

Tentei de todas as formas aqui, mas até então sem sucesso.

Alguém pode me ajudar!

Desde já grato.

Postado

Bom dia!!

Coloque esse código dentro do módulo de planiha

Private Sub Worksheet_Calculate()

If Sheets("Plan3").Range("A11").Value = 100 Then
MsgBox "Valor é! " & [A11].Value, vbOKOnly
End If

End Sub

Att

Postado

Olá companheiro. O código passado por você deu certo. Consegui atrelar a sintaxe sua aos valores que eu necessitava, contudo em vba ao dar o play funciona certinho, mas dentro da planilha ela ainda não dispara sozinha. Queria que ela disparasse sozinha sem a necessidade de criar um botão e atribuir um macro a ela entende?

Obrigado pela explicação anterior!

  • Membro VIP
Postado

Alan

Para ele funcionar automaticamente você tem que colocar o código no módulo da planilha e você deve ter colocado num módulo comum.

At.te

  • 3 semanas depois...

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...