 |
Escrevendo
Valores por Extenso - 32 bits (Word 7) |
Em muitas empresas, vários profissionais necessitam de preparar relatórios onde,
invariavelmente, muitos valores monetários aparecem. É praxe que num relatório
profissional todos esses valores sejam grafados tanto na sua forma numérica, quanto na
sua forma por extenso. Não é aceitável a simples menção do valor monetário, como R$
123,45. É mais do que uma praxe citar, entre parêntesis, tal valor por extenso, como
Cento e vinte e três reais, e quarenta e cinco centavos.
É uma tarefa tediosa e, principalmente, sujeita a erros. A solução é criar uma
macro para resolver tal problema.
Mas melhor do que macro é usar uma biblioteca toda para isso, e foi o que o Analista Antonio
Augusto Ferreira, de São Paulo, fez. Ele disponibilizou uma biblioteca -
no formato DLL - para os programas feitos para rodar em 32 bits (Word, Excel e
Access), e mais, também disponibilizou uma macro prontinha - e testada - para
você colocar direto, sem muito trabalho, no seu Word 7 ou superior. Atenção: se você possui a Versão 6.0 - 16 bits -
clique aqui.
Siga os passos indicados abaixo, dê um download
no arquivo EXTENSO.ZIP (são apenas 16 KBytes - menos de 20 segundos
de download) para seu disco, e passe a desfrutar do poder de escrever um valor qualquer,
em extenso correto - tudo ao simples toque de um botão na barra de ferramentas:
- Primeiro: faça o Download
do arquivo EXTENSO.ZIP,
que contém a biblioteca DLL e a Macro para o Word 7;
- Segundo: Extraia os arquivos que estão zipados no
EXTENSO.ZIP
(são eles: a biblioteca EXTENS32.DLL, e a Macro MACRO.TXT);
lembre-se de que a biblioteca dll deve ser copiada para a pasta SYSTEM que se
encontra dentro da pasta WINDOWS (ou se você gosta dos bons tempos do DOS:
para o diretório \WINDOWS\SYSTEM);
- Terceiro: Crie a macro no Word ....: Abra o
arquivo MACRO.TXT e copie para a memória o trecho indicado pelo título,
em maiúsculas, para o Word 7.0, ou 97); abra o Word e acione o comando Ferramentas
* Macro; na janela que se abre, dê um nome à macro - por exemplo: EXTENSO.DLL;
clique no botão [CRIAR]; apague as linhas que já vêm escritas Sub
Main e End Sub e que aparecem nessa janela; agora cole nessa janela o texto que
está na memória; e - finalmente - clique no botão [SALVAR];
- Quarto: Coloque um botão na barra de ferramentas do
Word para executar a nova macro ao simples toque do botão: Selecione o menu Ferramentas
* Personalizar; na janela que se abre selecione a opção Macro (está na aba
"Barra de Ferramentas") na caixa de "Categorias"; selecione a macro
que você acabou de criar (se seguiu nossa sugestão é a de nome EXTENSO.DLL); Arraste
com o mouse (lembre-se de manter o botão esquerdo pressionado) a macro até uma área
livre da barra de ferramentas desejada; solte o botão do mouse; escolha agora um botão
que represente a macro para você - ou dê um nome (curto) para que apareça no lugar do
ícone;
- Quinto: Comece a usar sua nova MACRO
DE EXTENSO;
Não se esqueça de três pequenos detalhes para que todo esse processo possa
funcionar:
- Os valores devem ser digitados com pelo menos um espaço antes do primeiro algarismo;
- O cursor deve estar imediatamente à frente do algarismo final, para que a macro - e a
biblioteca - possa funcionar;
- Se seu Word está em inglês, a macro em MACRO.TXT não vai
funcionar.
|
