Vamos dar um exemplo para entender como e onde podemos formatar a célula em moeda.
Temos os dados de quantidade do produto no intervalo A1: B9 em que a coluna A contém o nome do produto e a coluna B contém a quantidade dele. Queremos formatar a faixa de valor como moeda para que, para o usuário, seja fácil entender que um número é uma moeda.
Para escrever a macro, siga as etapas abaixo: -
- Abra a página do VBA e pressione a tecla Alt + F11.
- Insira um módulo.
- Escreva o código abaixo mencionado:
Sub FormatCurrency ()
Dim Sh como planilha
Definir Sh = ThisWorkbook.Sheets (1)
Sh.Range ("B2: B9"). NumberFormat = "$ #, ## 0.00"
End Sub
Explicação do código: -
Primeiro, demos o assunto para o código, depois definimos todas as variáveis, depois definimos o intervalo onde queremos colocar o formato da moeda.
Para executar a macro, pressione a tecla F5 e o formato do intervalo será alterado para o formato da moeda.
@ www.excelforum um dos usuários fez a pergunta semelhante: -
Formato da moeda, escrito nos EUA, executado em Xangai
Tenho um banco de dados de acesso que cria / preenche o Excel e formata o relatório. Eu tenho a moeda que está em USD, então eu formato como quando eu executo nos EUA, eu recebo o que espero "$ 100.000", mas quando este aplicativo é executado em Xangai, eles obtêm e, claro, os valores reais são os mesmos se executado nos EUA de Xangai.
Como faço para mostrar em dólares quando corro de Xangai?
Para verificar a solução clique aqui
http://www.excelforum.com/excel-programming-vba-macros/1075253-currency-format-written-in-us-run-in-shanghai.html
Download - Formatando Moeda em VBA - xlsm
