Em uma planilha Excel, tenho uma célula com uma data na forma 00-00-0000. Como escrever essa data por extenso, automáticamente em outra célula ?

Question

Em uma planilha Excel 2003, tenho uma célula com uma data na forma 00-00-0000. Como escrever essa data por extenso, automáticamente em outra célula ?

Answer 1

Carlos,

Como estamos trabalhando com datas o dia varia, apenas, de 1 a 31 (Um a Trinta e um). Assim, uma possível solução sem VBA seria:

Crie nas colunas Y e Z uma tabela assim

1	Um
2	Dois
3	Três
4	Quatro
5	Cinco
6	Seis
7	Sete
8	Oito
9	Nove
10	Dez
11	Onze
12	Doze
13	Treze
14	Catorze
15	Quinze
16	Dezesseis
17	Dezessete
18	Dezoito
19	Dezenove
20	Vinte
21	Vinte e um
22	Vinte e dois
23	Vinte e três
24	Vinte e quatro
25	Vinte e cinco
26	Vinte e seis
27	Vinte e sete
28	Vinte e oito
29	Vinte e nove
30	Trinta
31	Trinta e um

E use a seguinte fórmula

=PROCV(DIA(A1);$Y:$Z;2;0)&" de "&TEXTO(A1;"mmmm")&" de " &ANO(A1)

Espero que ajude

M.

Answer 2

Opa...falha minha, a fórmula estava errada.

Experimenta esta

=DIA(A1)&" de "&TEXTO(A1;"mmmm")&" de " &ANO(A1)

Deve funcionar.

Agora, para escrever 28 por extenso (vinte e oito) você precisa do VBA.

Faça uma busca na internet, por exemplo,  VBA Número por extenso, e você deve achar algumas funções já escritas e prontas para uso.

M.

Answer 3

Oi Carlos,

Veja se é isto que vc precisa (supondo sua data em A1)

=DIA(A1)&" de "&TEXTO(MÊS(A1);"mmmm")&" de " &ANO(A1)

Ou usar formato Personalizado

dd" de "mmmm" de "aaaa

Espero que ajude

M.

Answer 4

cria uma macro. ai vc vai precisar só executar uma combinação de teclas e pronto. olha o link abaixo pra saber como faz macro. vlw!

http://office.microsoft.com/pt-br/excel-help/criar-uma-macro-HP005204711.aspx

Answer 5

Em uma planilha do Excel 2003 tenho uma célula com uma data na forma 00-00-0000. Como colocar automaticamente em outra célula esta data por extenso?