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
 
thamir fernande em 22/11/2024

Seu Comentário:
muito obrigado pela
 
átila em 21/10/2024

Seu Comentário:
muito boa essa funçã
 
 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