none
SOMANDO VALORES EM TEXTBOX RRS feed

  • Pergunta

  • Olá caros amigos:

     

    Estou com uma dúvida que vocês poderão até achar uma bobeira mas eu não consegui fazer rsrsrsrsrs

     

    Tenho 3 valores em reais cada valor em uma célula do Excel. Criei uma userform e coloquei 4 textbox, 3 dessas textbox mostram os valores que se encontram nas células e na quarta textbox eu gostaria que mostrasse a soma dos 3 valores.

     

    Fiz o seguinte : textbox4=textbox1+textbox2+textbox3

     

    Só que dessa forma ao invéz de somar os valores os valores estão sendo concatenados.

     

    Como faço para que os valores sejam somados?

     

    Ex:

    O que eu quero :

    R$30,00(textbox1) + R$10,00(textbox2) + R$10,00*(textbox3) = R$50,00(textbox4)


    O que está ocorrendo:

    R$30,00(textbox1) + R$10,00(textbox2) + R$10,00*(textbox3) = R$30,00R$10,00R$10,00(textbox4)


    Como vocês podem observar no exemplo acima, ao invés do resultado ser a soma dos valores o que está ocorrendo é a concatenização dos valores, e o que eu quero é a soma.


    Muito obrigado pela ajuda meus amigos.

    quinta-feira, 27 de dezembro de 2007 13:26

Respostas

  • Boa Noite,

     

    Você terá que converter os valores para algum tipo numérico para poder somá-los. Isso pode ser feito usando funções como CINT e CDBL.

     

    Code Block
    TextBox4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text) + CDbl(TextBox3.Text)

     

     

    Se você tiver o R$, a conversão irá gerar um problema. Você terá que retirá-los. Tente fazer o seguinte:

     

    Code Block
    TextBox4.Text = CDbl(Replace(TextBox1.Text, "R$ ", "")) + CDbl(Replace(TextBox2.Text, "R$ ", "")) + CDbl(Replace(TextBox3.Text, "R$ ", ""))

     

     

    [ ]s,

     

    Gustavo

    quinta-feira, 27 de dezembro de 2007 23:43