Escola Saberexcel VBA Estudos® - Treinamentos com Macros & Curso Excel VBA Planilhas

Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções

Estas funções do Aplicativo Microsoft Excel VBA(Visual Basic Application), retornam o número da Semana do Ano,
com relação a determinadas datas e outra função também personalizada retorna os dias Decorridos durante o ano,
com base em determinadas datas.

FUNÇÕES PERSONALIZADAS: CALCULAR NUMERO SEMANA E DIAS DECORRIDOS


'//====='Funcão para calcular o numero de dias decorridos
Function DiasDecorridos(Datas)
  DiasDecorridos = Datas - DateSerial(Year(Datas) - 1, 12, 31)
End Function

'//====='Funcao calcular o número da semana base data
Function NumeroSemana(Datas As Date) As Integer
    Dim Semana As Integer
    Semana = Int((Datas - DateSerial(Year(Datas), 1, 1) + _
        ((Weekday(DateSerial(Year(Datas), 1, 1)) + 1) _
        Mod 7) - 3) / 7) + 1
    If Semana = 0 Then
        Semana = NumeroSemana(DateSerial(Year(Datas) - 1, 12, 31))
    ElseIf Semana = 53 And (Weekday(DateSerial(Year(Datas), 12, 31)) - 1) _
        Mod 7 <= 3 Then
        Semana = 1
    End If
    NumeroSemana = Semana
End Function

'//====='
Escola Saberexcel VBA Estudos
Treinamentos com Macros, Fórmulas e Funções

Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos
Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.




 u - Procedimentos de Aquisição dos produtos Didáticos SaberExcel
Seja um assinante Escola saberexcel VBA -
 Baixe o exemplo de planilha contendo os macros acima:
   SBL Excel VBA - Data funcao dias decorridos e num semana (44.33 kB)