Este fórum está sendo desativado

[ttorres]

Olá queridos,
eu tenho um código que verifica se na célula contem a palavra CRITÉRIO, porém esse célula ela busca a informação através da seguinte fórmula:

Olá,

Possuo uma célula com a seguinte fórmula:

Código: Selecionar todos

=SEERRO(PROCV(D11;CONFIG!D:E;2;FALSO);"")

O que preciso é consultar se nessa célula o valor é DÍZIMO.

Estou usando a seguinte formula em VB

Código: Selecionar todos

 If Target.Value = "DÍZIMO" Then

Não está funcionando, se na célula que tem a formula que obtem o resultado dízimo eu apagar e colocar o nome dízimo funciona.

Quem puder ajudar, ficarei agradecido.

[alexandrevba]

Bom dia!!

Qual o evento que você está usando, geralmente usa se o evento:Calculate()

Código: Selecionar todos

Private Sub Worksheet_Calculate()

Att

[ttorres]

Bom dia!!

Qual o evento que você está usando, geralmente usa se o evento:Calculate()

Código: Selecionar todos

Private Sub Worksheet_Calculate()

Att

Olá querido,
a fórmula é essa

Código: Selecionar todos

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("B2:B10")) Is Nothing Then
    'Cancel = True
        If Target.Value = "dízimos" Then
            UserForm1.Show
        End If
    End If
End Sub