VBA -VALOR POR EXTENSO

Objetivo:

Escrever um valor monetário por extenso.


Versão que esta sendo usada para este aprendizado:

Excel 2007


Créditos da rotina Extenso: Robert Martim

Exemplo:

Passo 1:

Clique abaixo no botão Copiar texto.

Na planilha, clique com o botão direito do mouse onde esta escrito Plan1 e escolha a opção Exibir Código conforme figura abaixo

Após clicar em Exibir Código, vamos obter a seguinte tela.

Clique no segundo botão e insira um módulo.

Note que esta selecionado Módulo1 e o seu cursor esta na linha logo abaixo a palavra (Geral)

Neste ponto, dê um CTRL+V (Control V) para colar o texto copiado

Clique na parte superior esquerda (figura do Excel) para retornar à planilha

Na célula A1 digite 123,45.

Clique na célula B1 (local onde vamos colocar o resultado por extenso)

Clique em Fx

Em categoria selecione a opção Definida pelo usuário

Escolha a opção Extenso_Valor e clique Ok

Em Argumentos da função digite A1 (local onde esta o nosso valor) e tecle Ok

Você irá obter o resultado conforme a figura abaixo

Salve seu arquivo com o formato de macro - extensão .xlsm


Habilitando a planilha para uso
Se na hora da execução do programa, aparecer a mensagem abaixo, clique em opções.

Em seguida em Habilitar.


Baixe este modelo
ð Clique aqui - [Formato .ZIP]

Leia mais
ð Leia também as nossas dicas

Voltar página anterior   Voltar menu funções


Faça um de nossos Cursos - clique aqui para mais detalhes

Comentários
 
hugo m. duarte em 07/02/2016

Seu Comentário:
melhor impossível ! macro muito bom. sempre aprendendo...

Nossa Resposta: obrigado continue conosco. abs
 
lucélia fátima mosena em 05/02/2016

Seu Comentário:
deu certo! obrigada!

Nossa Resposta: obrigado continue conosco. abs
 
nilson rocha em 28/01/2016

Seu Comentário:
boa tarde, suas dicas foram muito valiosas, que deus te ilumine e abençoe muito

Nossa Resposta: obrigado continue conosco. abs
 
rosiane em 27/01/2016

Seu Comentário:
excelente, muito obrigada!

Nossa Resposta: obrigado continue conosco. abs
 
carlos josé cardoso em 27/01/2016

Seu Comentário:
bom dia!!!!preciso baixar o ver extenso

Nossa Resposta: obrigado continue conosco. abs
 
lucas em 21/01/2016

Seu Comentário:
muito obrigado, ajudou muito.

Nossa Resposta: obrigado continue conosco. abs
 
 Deixe seu comentário
Nome
Email
Mensagem

Quantidade de caracteres digitados:   Limite máximo de 240 caracteres

     

 

Voltar página anterior   Voltar menu funções

 

Microsoft e o logotipo do Office são marcas registradas ou comerciais da Microsoft Corporation nos Estados Unidos e/ou em outros países