Excel VBA - Moedas

  • - Acesso Livre
  • Documentos

    Ordenar por : Nome | Data | Acessos [ Ascendente ]

    vba converte moedas dolar euro libra franco vba converte moedas dolar euro libra franco

    popular!
    Adicionado em: 03/12/2010
    Modificado em: 03/12/2010
    Tamanho: Vazio
    Downloads: 1000

    Saberexcel - o site das macros
    Essa macro do Aplicativo Microsoft Excel VBA, converte moedas estrangeiras (Dolar,Euro,Libra,Franco) para o Real, também faz uma uma formatação personalizada para as moedas como pode ser verificado na macro abaixo. Os valores são fictícios e tem somente finalidade didática.
    VALORES FICTICIOS - COM FINALIDADE DIDÁTICA.

    Sub conversao_moedas()
    'formatação personalizada da moeda.
    dolar = "#,##0.00 [$$-1]_-;[Red]#,##0.00 [$$-1]_-"
    euro = "#,##0.00 [$€-1]_-;[Red]#,##0.00 [$€-1]_-"
    libra = "#,##0.00 [$£-1]_-;[Red]#,##0.00 [$£-1]_-"
    franco = "#,##0.00 [$Fr-1]_-;[Red]#,##0.00 [$Fr-1]_-"

    On Error Resume Next
    If [A1].Value = 1 Then
    [E8].Value = Round([C8].Value / [D8].Value, 2)
    [E8].NumberFormat = dolar

    ElseIf [A1].Value = 2 Then
    [E8].Value = Round([C8].Value / [D8].Value, 2)
    [E8].NumberFormat = euro

    ElseIf [A1].Value = 3 Then
    [E8].Value = Round([C8].Value / [D8].Value, 2)
    [E8].NumberFormat = libra

    ElseIf [A1].Value = 4 Then
    [E8].Value = Round([C8].Value / [D8].Value, 2)
    [E8].NumberFormat = franco
    End If

    End Sub



    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA SaberExcel




    Excel planilha vba converte moeda euros em reais Excel planilha vba converte moeda euros em reais

    popular!
    Adicionado em: 15/10/2011
    Modificado em: 15/10/2011
    Tamanho: Vazio
    Downloads: 863

    Saberexcel - o site de quem precisa aprender Macros Microsoft Excel VBA

    Essa macros do Aplicativo Microsoft Excel VBA (Visual Basic Application) contém intrução for each next converte os valores de reais em euros,
    e retorna uma mensagem do valor da conversão referente a um programa de treinamento Curso Completo Microsoft Excel VBA.

    Esse exemplo faz parte do MODULO treinamento com loops - 100 Planilhas com loops
    TREINAMENTOS COM LOOPS - ESCOLA SABEREXCEL VBA ESTUDOS - TREINAMENTOS COM MACROS FÓRMULAS E FUNÇÕES.
    100 PLANILHAS COM EXERCÍCIOS LOOPS -
    \ While...Wend \ Do...While...Loop \ Do...Loop...While \ Do...until..Loop \ Do...Loop...until \ For...Next\ For...Each...Next

    Sub Converter_reais_em_Euro()
    [f2].Select
    Set Area = Selection 'Plan1.[f2]

    For Each Cell In Area
    sbx = Round(Cell / [F1].Value, 3)
    Cell.Offset(1, 0).Value = sbx
    Cell.NumberFormat = "#,##0.00"
    Next Cell

    MsgBox ("Valor do Curso Completo Microsoft Excel") & vbCrLf & _
    "Escola Saberexcel VBA Estudos - Treinamento Macros, " & _
    "são: [ " & Format([f3].Value, "##,####.00" & "€ ] "), vbInformation, "Saberexcel - o site das macros"
    [B1].Select
    End Sub

    Sub Converter_reais_em_Euro_1()
    [vl].Select 'celulas renomeadas como (vl)
    Saber2.[g1].Value = Saber2.[ve].Value
    Set Area = Selection 'Plan1.[f2]

    'fazendo um loop por toda as células selecionadas(vl)
    For Each Cell In Area
    sbx = Round(Cell / [g1].Value, 3)
    Cell.Offset(0, 2).Value = sbx 'deslocando duas colunas à direita
    Cell.NumberFormat = "$ #,##0.00"
    Next Cell

    'somando valores usando Função de planilha WorksheetFunction(Soma)
    'temos 340 planihas exercícios com WorksheetFunctions(VBA) uma para cada função do excel
    Saber2.Range("g1") = Application.WorksheetFunction.Sum(Saber2.Range("ve"))
    Saber2.Range("g2") = Application.WorksheetFunction.Sum(Saber2.Range("vle"))
    Saber2.Range("g3") = Application.WorksheetFunction.Sum(Saber2.Range("vl"))

    'mensagem concatenando os valores
    MsgBox ("Valores em reais convertidos em Euros") & vbCrLf & _
    "Escola Saberexcel VBA Estudos - Treinamento Macros, " & _
    "são: [ " & Format([g2].Value, "##,####.00" & "€ ] "), vbInformation, "Saberexcel - o site das macros"
    [B1].Select
    End Sub


    Sub limpar_teste()
    [g1,g2,g3,vle].ClearContents
    End Sub



    Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.



    Excel formulas converter moedas reais em euros dolares Excel formulas converter moedas reais em euros dolares

    popular!
    Adicionado em: 05/04/2011
    Modificado em: 05/04/2011
    Tamanho: Vazio
    Downloads: 4832

    Saberexcel - o site de quem precisa aprender Microsoft Excel VBA

    Essas fórmulas do Aplicativo Microsoft Excel, faz a conversão de moedas, reais para dolares e euros, a pedido de nossa aluna Marta/Recife.
    é um exemplo muito simples com uso do objeto checkbox do Barra de Ferramenta 'Formulário' do aplicativo Excel.


    Prezado Senhor Marcondes,
    preciso fazer uma planilha simples com fórmulas que retorna valores convertidos
    de um determinado produto de reais em dolares e euros.
    Caso o senhor tenha algum exemplo.

    Prezada Marta,
    Fiz um exemplo simples como você pediu, com usando os nomes de nossos produtos,
    didáticos saberexcel. Quando selecionar um checkbox as fórmulas mostrará em uma segunda tabela,o produto adquirido e a soma os valores em dolares, euros e reais, somando seus valores.
    Espero que o exemplo possa lhe ser útil - Fique com Deus, E_Marcondes.





    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel




    Publicidade
    Compre com segurança, garantia e ótimos preços
    Eletrônicos - Submarino.com.br

    PROMOÇÃO DIDÁTICOS SABEREXCEL



    Adquira já o Acesso Imediato
    à Area de Membros

    Compra Grantida --- Entrega Imediata

    Aprenda Excel VBA com Simplicidade de 
    códigos e Eficácia, Escrevendo Menos e
    Fazendo Mais.

    '-------------------------------------'
    Entrega Imediata:
    +  500 Video Aulas MS Excel VBA
    +  35.000 Planilhas Excel e VBA
    +  Coleção 25.000 Macros MS Excel VBA
    +  141 Planilhas Instruções Loops
    +  341 Planilhas WorksheetFunctions(VBA)
    +    04 Módulos Como Fazer Excel VBA
    +  Curso Completo MS Excel VBA
    +  Planilhas Inteligentes


    Pesquisa Google SaberExcel

    Publicidade Google

    <script type="text/javascript"><!--

    google_ad_client = "ca-pub-2317234650173689";

    /* retangulo 336 x 280 */

    google_ad_slot = "0315083363";

    google_ad_width = 336;

    google_ad_height = 280;

    //-->

    </script>

    <script type="text/javascript"

    src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

    </script>

    Publicidade

    RSFirewallProtected


    Google Associados

    Depoimentos

    Adicione Saberexcel Favoritos

     
     

    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


       Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA