Vba: como calcular dias entre duas datas

Você pode usar a seguinte sintaxe básica em VBA para calcular o número de dias entre duas datas:

 SubDaysBetweenDates ()

    Dim i As Integer

    For i = 2 To 7
        Range(" C " & i) = DateDiff(" D ", Range(" A " & i), Range(" B " & i))
    Next i
    
End Sub

Este exemplo específico calculará o número de dias entre as datas nas células correspondentes nos intervalos A2:A7 e B2:B7 e retornará os resultados no intervalo C2:C7 .

Observe que o argumento “D” na função DateDiff especifica que queremos calcular a diferença de datas em termos de dias.

Consulte a página de documentação do VBA para obter uma lista completa de unidades que você pode usar para a diferença de data.

O exemplo a seguir mostra como usar essa sintaxe na prática.

Exemplo: Calcular dias entre datas em VBA

Suponha que temos as duas colunas a seguir com datas no Excel:

Suponha que queiramos calcular o número de datas entre a data de início e a data de término em cada linha e exibir os resultados na coluna C.

Podemos criar a seguinte macro para fazer isso:

 SubDaysBetweenDates ()

    Dim i As Integer

    For i = 2 To 7
        Range(" C " & i) = DateDiff(" D ", Range(" A " & i), Range(" B " & i))
    Next i
    
End Sub

Quando executamos esta macro, recebemos a seguinte saída:

O número de datas entre cada data de início e cada data de término é indicado na coluna C.

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

Como comparar datas em VBA
Como filtrar uma coluna usando VBA
Como classificar valores em ordem alfabética no VBA