Visual Basic VBA: Subtração entre 2 txtbox em um form.

[DECOVIOTI]

Olá Pessoal

Eu estou desenvolvendo um formulário no VBA que tem o "Text 1" and "Text 2"  os quais estou tentando realizar uma subtração entre eles e mostrar o resultado em um Text3. No momento estou utilizando a macro abaixo a qual esta funcionando. 

O meu problema e que estou tentando criar uma validação, na qual, por exemplo, se o usuário digitar no "Text 1" = 1000 e no "Text 2" = 2000, gostaria que o vba exibisse uma mensagem para o usuário do tipo "Text1" não pode ser menor que o "Text2". e dar um reset no Text1 and Text 2

 

Sera que alguém pode me ajudar?

 

Sub SubtrairTXT()

'
On Error Resume Next

If Text1.Value <> "" And Text2.Value <> "" Then
    If Text1.Value >= 0 And Text2.Value >= 0 Then
        Text3.Value = Text1.Value - Text2.Value
        Text3.Value = Format(Text3.Value, "$#,##0.00;-$#,##0.00")
    Else
        Cancel = True
    End If
Else
    Cancel = True
End If

End Sub

 

 

Obrigado

 

[AfonsoMira]

@DECOVIOTI Boas quais os nomes dos dois textbox ? 

Para poder ajudar melhor, por favor anexe o seu arquivo. No seu caso terá que zipar primeiro, pois contem macro/VBA.