|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Datas/Números/Strings)
|
|
 |
Título da Dica: Função para conhecer o primeiro dia da semana:
|
 |
|
|
|
Postada em 4/10/2003 por Roßerto
Function PrimeiroDiaDaSemana(D As Variant, Optional FirstWeekday As Integer) As Variant
If IsMissing(FirstWeekday) Then 'Sunday is the assumed first day of week.
PrimeiroDiaDaSemana = D - WeekDay(D) + 1
Else
PrimeiroDiaDaSemana = D - WeekDay(D, FirstWeekday) + 1
End If
End Function
|
|
|
|
|
