Rafael_Luna_2019

resolvi o problema, acontece que tinha só que definir a variável como double mais que fique de lembrete se alguem tiver com esse impasse também

Olá, estou tentando fazer uma comparação de duas textBox no VBA, queria colocar uma margem de erro de R$5,00, para se caso o valor real ultrapassasse o valor estimado em até 5 reais, continuasse na cor preta, caso ultrapassasse o teto, a cor muda para vermelho. quando fiz o teste usando somente o valor estimado, deu tudo certo, más quando coloquei "+ 5", o texto fica sempre vermelho. queria enteder o que está acontecendo ValorReal e ValorEst são ambos TextBox. Private Sub ValorReal_Change() Dim Teto Teto = ValorEst.Value + 5 '(se o ValorReal estiver vazio, os tipos se tornam incompatíveis, por que o ValorReal.Value passa a ser do tipo string) If Not ValorReal.Value = "" Then If ValorReal.Value > Teto Then ValorReal.ForeColor = &HFF& Else ValorReal.ForeColor = &H0& End If End If End Sub