Notifications
Clear all

Adaptação de calendário

4 Posts
3 Usuários
0 Reactions
1,173 Visualizações
(@vguedes)
Posts: 47
Eminent Member
Topic starter
 

Prezados,

Baixei um exemplo de calendário no próprio excel no qual mudando o ano em um botão de rotação, o calendário se adapta automaticamente.

Com o calendário, o objetivo é destacar as semanas de cada mês, distinguidas por cores distintas cada uma, seguindo o seguinte critério:

- As semanas começam no sábado e terminam na sexta

- Se a semana terminar no mês subsequente, ela é definida como primeira semana do mês subsequente.

Gostaria de criar uma fórmula, macro ou formatação condicional para que após o clique no botão e, consequentemente, a mudança do ano, o preenchimento colorido se adapte automaticamente ao ano escolhido, respeitando os critérios citados acima.

Sei que é complicado explicar a situação sem a visualização do problema, por isso estou disponibilizando a planilha em anexo. Fiz na mão a maneira como gostaria que ficasse o ano de 2014.

Peço desculpas caso esta não seja o lugar ideal do fórum para este tipo de problema, caso seja necessário posso criar este tópico em outro ambiente.

Desde já, obrigado a todos!

 
Postado : 22/01/2014 11:37 am
(@savio)
Posts: 12
Active Member
 

Digite uma determinada data na célula A1.
Em outra célula digite a fórmula =MOD(INT(A1/7)+1;5)+1.
O resultado retornará o número da cor a ser utilizada (de 1 a 5).
Só não sei como distribuir as cores no calendário :(

 
Postado : 22/01/2014 10:03 pm
(@savio)
Posts: 12
Active Member
 

Digite uma determinada data na célula A1.
Em outra célula digite a fórmula =MOD(INT(A1/7)+1;5)+1.
O resultado retornará o número da cor a ser utilizada (de 1 a 5).
Só não sei como distribuir as cores no calendário :(

Apenas complementando a explicação:

Cor 1 - Vermelha (pois é a cor usada na primeira data - 01/01/1900)
Cor 2 - Azul
Cor 3 - Laranja
Cor 4 - Cinza
Cor 5 - Amarela

 
Postado : 22/01/2014 10:17 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

fórmula =MOD(INT(A1/7)+1;5)+1

A partir da fórmula do Sávio, como o limite de formatação condicional é 3 por célula, incluí a fórmula em código VBA.

Abs aos 2

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 23/01/2014 6:45 am