Título da Dica: Achar a data da segunda e da sexta a partir de um dia da semana
Postada em 23/12/2004 por Rafael
rafa_day@hotmail.com
'Se hoje é Quarta (12/12/2004) está função irá te dizer a data da Segunda (10/12/2004) e a data da Sexta(14/12/2004)
'Date é a data de hoje DataSegunda = Date - (CDbl(Weekday(Date)) - 2) DataSexta = (6 - CDbl(Weekday(Date))) + Date
