Notifications
Clear all

Mascara de entrada

2 Posts
2 Usuários
0 Reactions
1,140 Visualizações
(@eduhaag)
Posts: 36
Trusted Member
Topic starter
 

Ola pessoal,
Preciso de uma mascara no formato de moeda para um textbox

o problema que nãotenho o numero de caracteres fixo, ele pode ir desde 0,01 a 9.999,99

Alguem pode me ajudar?

 
Postado : 15/03/2013 10:00 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Veja se pode lhe ajudar..

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    If TextBox1 = vbNullString Then Exit Sub
    If IsNumeric(Me.TextBox1.Value) Then
        Me.TextBox1.Value = Format(Me.TextBox1.Value, "Currency")
    Else
        MsgBox "Valor número digitado"
    End If
End Sub

Lembre se de usar a pesquisa do fórum!!!

viewtopic.php?f=23&t=3281
viewtopic.php?f=21&t=3766

Att

 
Postado : 16/03/2013 5:32 am