O meu código ficou assim pois deixei aberto para colocar ',' e '.' na caixa de texto, achei esses valores testando como o professor fez.
Private Sub txtValor_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If keyasii < 44 Or KeyAscii > 57 Then
KeyAscii = 0
End If
End SubPorém, quando eu vou colocar qualquer número ou caracter na caixa de texto, não aparece, nem mesmos os números, porque isso acontece?
Acabei de perceber que estava com erro de sintaxe, já foi corrigido e agora está funcionando normalmente, não sei apagar o tópico daqui..
