Autor: Luiz Osório Paim Pereira

Vamos criar um pequeno calendário permanente usando algumas funções? [SE(), DIA.DA.SEMANA(), PROCURAR(), DIA(), OU(), DIASNOMÊS()]
Na primeira célula (B1) entramos a data, formatada para exibir mm/AAAA. No exemplo temos Jan/2007.
As células B2, B3, B4, B5, B6, B7 e B8 contém os dias da semana. De C2 a H8, teremos calculado os dias conforme abaixo:
Nas células C2 a C8, temos o cálculo propriamente dito da primeira semana do mês/ano em questão. Veja a fórmula:
=SE(C1<>"";C1+1;SE(DIA.DA.SEMANA($B$1)=((PROCURAR(B2;"DomSegTerQuaQuiSexSab";1)-1)/3)+1;dia($B$1);""))
Testamos a célula acima para saber se não é vazio.
Caso a condição seja verdadeira (não é vazio), incrementamos 1 (C1+1... C7+1) para obter o próximo dia (2, ...) -> SE(C1<>””;C1+1;...
Caso a condição seja falsa (vazio), testamos para saber se o primeiro dia do mês que queremos obter é igual ao dia da semana da coluna anterior (coluna B) -> SE(DIA.DA.SEMANA($B$1)=((PROCURAR(B2;"DomSegTerQuaQuiSexSab";1)-1)/3)+1;dia($B$1);"") Para tal, usamos um pequeno algorítimo apoiado na função para comparar com a função -> PROCURAR(;;).
Obtemos o dia da semana. Ex.:
Se o dia 1 do mês em B1 é Dom Temos pos 1 – 1 / 3 + 1 = 1
Seg pos 4 – 1 / 3 + 1 = 2
Ter pos 7 – 1 / 3 + 1 = 3
Qua pos 10 – 1 / 3 + 1 = 4
Qui pos 13 – 1 / 3 + 1 = 5
Sex pos 16 – 1 / 3 + 1 = 6
Sáb pos 19 – 1 / 3 + 1 = 7

Para ver o resultado desta dica, transfira o exemplo:
Arquivo: Dica de Calendário