VBA - Função IF

Question

VBA - Função IF

Anônima

Boa tarde,

Preciso de uma ajuda no seguinte sentido:

Tenho uma tabela:

Fiz um código IF para checagem do total da distribuição dos pesos do vencimento:

    If Range("B2") = "" Then 

    ElseIf Range("U2") &lt;&gt; 1 Then 

    MsgBox ("Total do Peso de Vencimento na Linha 2 não é 100%") 

    Exit Sub 

    End If 

    If Range("B3") = "" Then 

    ElseIf Range("U3") &lt;&gt; 1 Then 

    MsgBox ("Total do Peso de Vencimento na Linha 3 não é 100%") 

    Exit Sub 

    End If 

    If Range("B4") = "" Then 

    ElseIf Range("U4") &lt;&gt; 1 Then 

    MsgBox ("Total do Peso de Vencimento na Linha 4 não é 100%") 

    Exit Sub 

    End If 

    If Range("B5") = "" Then 

    ElseIf Range("U5") &lt;&gt; 1 Then 

    MsgBox ("Total do Peso de Vencimento na Linha 5 não é 100%") 

    Exit Sub 

    End If

Ela checa todas as celulas "U" para verificar se o valor é diferente de 1 e se for retorna uma mensagem dizendo que existe um problema na distribuição.

Porém, quando eu uso uma distribuição como na linha 3 (30% | 40%| 20%| 10%) ou 4 (40%| 30%| 20%| 10%) ele retorna a mensagem que deveria dar somente quando o valor fosse diferente de 1, só que soma fecha 1, que é os 100%.

No caso acima, ele reconhece que o valor da célula U3 - que nessa imagem seria a 3 linha - como se fosse diferente de um e passa para o retorno da mensagem de erro;

Não sei o que fazer para corrigir isso...

Pergunta bloqueada. Essa pergunta foi migrada da Comunidade de Suporte da Microsoft. É possível votar se é útil, mas não é possível adicionar comentários ou respostas ou seguir a pergunta.

0 comentários

1 resposta

Answer 1

Esta resposta foi traduzida automaticamente. Como resultado, pode haver erros gramaticais ou palavras estranhas.

Olá André Luiz Boschetti,

Obrigado por usar nossa comunidade Microsoft.

Odeio dar más notícias, mas esta pergunta está além do escopo da comunidade de apoio às respostas. O melhor lugar para obter ajuda com o VBA no Excel é o Microsoft Docs, que visa suportar usuários mais avançados como você.

Aqui está um link para o fórum onde você pode levantar cenários específicos e compartilhar sua ideia para ajudar a resolver o problema. Este fórum só pode fazer perguntas em inglês, peço desculpas antecipadamente por causar problemas.

Não poderei ajudá-lo, mas deixarei essa pergunta aberta caso um de nossos voluntários incríveis tenha ideias para você.

Obrigado por sua compreensão e apoio.

Sinceramente

Mavis - | MSFT Especialista em Suporte à Comunidade da Microsoft