VBA – Como obter a data de início e fim pelo número da semana

Post rápido!

Precisei disso à pouco e achei uma solução o fórum oficial da Microsoft fantástica! Precisei exatamente do que está escrito no título:

“obter a data de início e fim pelo número da semana”

Não havia como fugir pois o número da semana era o único parâmetro fornecido. Pois bem, tem um jeito! A função DateAdd! Veja o código abaixo:

DateAdd(“ww”,[Número da semana],DateSerial(Year(Date()),1,1))

Onde obviamente você deve substituir o segundo parâmetro pelo inteiro que representa o número da semana. O resultado é o primeiro dia daquela semana que foi mencionada. Para obter o último dia, basta pegar o primeiro dia da próxima semana e subtrair um dia. No caso acima, Date() está retornando a data atual, da mesma forma que a função Now.

Mais fácil impossível! Bom proveito!

Referências

http://answers.microsoft.com/en-us/office/forum/office_2010-access/convert-week-number-to-date/3d0f8c90-a155-e011-8dfc-68b599b31bf5?auth=1

Comentários

comentários