|
|
|
![](images/pasta_topo.gif)
|
![](images/folha.gif)
|
Dicas
|
![](images/folha_fim.gif)
|
Visual Basic (Datas/Números/Strings)
|
|
![](images/box01esqsup.gif) |
Título da Dica: Função para retornar o último dia da semana:
|
![](images/box01dirsup.gif) |
|
|
Postada em 5/10/2003 por Roßerto
Function ÚltimoDiaDaSemana(D As Variant, Optional FirstWeekday As Integer) As Variant If IsMissing(FirstWeekday) Then ÚltimoDiaDaSemana = D - WeekDay(D) + 7 Else ÚltimoDiaDaSemana = D - WeekDay(D, FirstWeekday) + 7 End If End Function
|
|
|
|
![](images/hosted.gif)
|