Esta fórmula do Aplicativo Microsoft Excel, usando a Função Ext.Texto, retorna caracter "Barra" em datas digitadas como número, neste exemplo usamos a data no FORMATO(ano,mes dia) e FORMATO(dia,mes,ano).
Essa fórmula poderá ser útil para agilizar a digitacao de datas

Observe o exemplo abaixo, se desejar baixar o exemplo de planilha para testar a formula baixe no final da página.
Fiquem com Deus. Bons estudos.

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA (Visual Basic Application) com os produtos didáticos SaberExcel

Contando semanas usando Fórmulas
Saberexcel - Dicas de Fórmulas e Funções

Esta formula calcula quantas semanas faltam para terminar o mês a partir da data
Digita na uma data desejada na célula(A1)

Obtendo uma reposta concatenando dado:
Até a presente data 01/09/2010 faltam 5 semanas para terminar o mês de setembro 2010
5 semanas para terminar o mês de setembro 2010

Fórmula Usada
="Até a presente data "&TEXTO(A1;"dd/mm/aaaa")&" faltam "&INT((DATA(ANO(HOJE());MÊS(HOJE())+1;0)-DATA(ANO(HOJE());MÊS(HOJE());DIA(A1)))/7+1)&" semanas para terminar o mês de "&TEXTO(A1;"mmmm")&" "&TEXTO(A1;"aaaa")

=INT((DATA(ANO(HOJE());MÊS(HOJE())+1;0)-DATA(ANO(HOJE());MÊS(HOJE());DIA(A1)))/7+1) &" semanas para terminar o mês de "&TEXTO(A1;"mmmm")&" "&TEXTO(A1;"aaaa")

Contando semanas entre duas datas baseado no dia da semana da célula(A1)
Neste intervalo de datas: [01-setembro-2010 e 09-outubro-2010]
5 Semanas

Formulas usadas
="Neste intervalo de datas: ["&TEXTO(A1;"dd-mmmm-aaaa")&" e "&TEXTO(B1;"dd-mmmm-aaaa"&"]")
=SOMARPRODUTO(--(DIA.DA.SEMANA(LIN(INDIRETO(A1&":"&B1));1)=C1))& " Semanas"

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com SaberExcel








Produtos de beleza e saúde a bons preços com a confiança das Lojas submarino

Saberexcel - o site das macros
Excel Funções personalizadas retornam a Fórmula da célula
Funções retornam a fórmula usada em uma região e ou célula
Observem que o código Cell.FormulaLocal Retorna ou define a
fórmula para o objeto, usando referências de estilo A1 no idioma
do usuário.


Essa Função retorna a fórmula usada, mas em Ingles
Function Retorna_Formula(Cell As Range) As String
Retorna_Formula = Cell.Formula
End Function

Essa Funçao retorna a Fórmula usada em Portugues(Br-pt)
Function Retorna_Formula_Local(Cell As Range) As String
Retorna_Formula_Local = Cell.FormulaLocal
End Function

Aprenda tudo sobre o Aplicativo microsoft Excel VBA com Saberexcel

Saberexcel - o Site das Macros.
Essa funçao do Aplicativo Microsoft Excel, função FIMMÊS, retorna o último dia de determinado mês, aqui inserí um exemplo de formula alternativa para a função FIMMÊS.

Usando a Funçao FIMMÊS para retornar último dia do mês

31/01/2011 =SE(B15="";"";FIMMÊS(E9;0))
28/02/2011 =SE(B16="";"";FIMMÊS(E9;B15))

Formula opcional à Funçao FIMMÊS
31/01/2011 =DATA(ANO(E6);B15+1;1)-1

01/01/2011

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com SaberExcel

  Função DATADIF fórmula calcula a idade
Saberexcel - Dicas de Funções e Formulas

Usando a Funçao DATADIF para retornar a idade, com determinada data inserida na célula A1
Abaixo uma fórmula alternativa para a função DATADIF
Exemplo:

Célula(A1) = 12/12/1980

Poderá usar qualquer uma dessar fórmulas:
B1 = DATADIF(A1;HOJE();"y")
B2 = DATADIF(A1;AGORA();"y")

Para retornar uma mensagem concatenando dados
=B4&", voce nasceu dia ["&TEXTO(A1;"dd-dddd-mmm-aaaa")&"] portanto esta com ["&B1&" ]anos"
Esta fórmula retorna uma mensagem concatenando datas do resultado da Funçao DATADIF
Retorno: "Pedro, voce nasceu dia [12-sexta-feira-dez-1980] portanto esta com [29 ]anos"

Uma fórmula alternativa para DATADIF é:
=TEXTO(SE(OU(MÊS(HOJE())>MÊS(A1);E(MÊS(HOJE())=MÊS(A1);DIA(HOJE())>=DIA(A1)));(HOJE()-A1)/365,25;(HOJE()-A1)/365,25-1);"0")
29

Existem muitas fórmulas envolvendo o datadif, espero por publicar para ajudar a quem precisa dessas informações.

Aprenda tudo sobre o Aplicativo Microsoft Excel vba com os produtos didáticos Saberexcel






Compre pela internet com segurança e garantia nas lojas SubMarino