none
MULTIPLICAÇÃO NO VBA RRS feed

  • Pergunta


  • PRECISO FAZER A CONVERSÃO DO DÓLAR ONDE EU DIGITO O VALOR DO DÓLAR E JÁ SAI O VALOR DO REAL CONVERTIDO, E NO VALOR VENDA JÁ SAIA COM A PORCENTAGEM DE VENDA, ALGUÉM PODE ME AJUDAR?

    AS CAIXA TESTBOX ESTÃO DEFINIDAS ASSIM

    CAIXA_VALOR1  --->ESSE É O DOLAR

    VALOR_DOLAR   --->ESSE EU DIGITO O VALOR DO DOLAR

    CAIXA_VALOR2  ---->ESSE JA SAI O VALOR DO REAL CONVERTIDO

    VALOR_VENDA --->ESSE JA SAI COM A PORCENTAGEM  ENCIMA DO VALOR CONVERTIDO

    TENTEI VÁRIOS CÓDIGOS QUE SÓ ME RETORNAM O VALOR 0

    terça-feira, 9 de maio de 2017 12:31

Todas as Respostas

  • Private Sub cmdCalcular_Click()
    
    txtConversaoDolarReal.Text = CDbl(txtQuantidade.Text) * CDbl(txtValorDolar.Text)
    
    txtValorComPorcentagem.Text = CDbl(txtConversaoDolarReal.Text) * CDbl(txtPorcentagem.Text) + CDbl(txtConversaoDolarReal.Text)
    
    End Sub


    Anderson Diniz


    segunda-feira, 3 de julho de 2017 23:10
  • Olá Rogério Sena,

    Retire o .text e teste.

    No MSAccess seria assim:

    Private Sub cmdCalcular_Click() txtConversaoDolarReal = CDbl(txtQuantidade) * CDbl(txtValorDolar) txtValorComPorcentagem = CDbl(txtConversaoDolarReal) * CDbl(txtPorcentagem) + CDbl(txtConversaoDolarReal)

    'https://cld.pt/dl/download/f4fc921c-2f59-4619-a78c-a890ad230acb/MultiplicacaoAccessVBA.zip End Sub

    O link comentado no código é o meu exemplo em Access, não tenho permissoes de colocar links.

    Abraço

    sexta-feira, 7 de julho de 2017 11:09