Vba: i̇ki tarih arasındaki günler nasıl hesaplanır

İki tarih arasındaki gün sayısını hesaplamak için VBA’da aşağıdaki temel sözdizimini kullanabilirsiniz:

 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

Bu özel örnek, A2:A7 ve B2:B7 aralığındaki ilgili hücrelerde tarihler arasındaki gün sayısını hesaplayacak ve sonuçları C2:C7 aralığında döndürecektir.

DateDiff işlevindeki “D” bağımsız değişkeninin, tarih farkını gün cinsinden hesaplamak istediğimizi belirttiğini unutmayın.

Tarih farkı için kullanabileceğiniz birimlerin tam listesi için VBA dokümantasyon sayfasına bakın.

Aşağıdaki örnek, bu sözdiziminin pratikte nasıl kullanılacağını gösterir.

Örnek: VBA’da tarihler arasındaki günleri hesaplama

Excel’de tarih içeren aşağıdaki iki sütuna sahip olduğumuzu varsayalım:

Her satırdaki başlangıç tarihi ile bitiş tarihi arasındaki tarih sayısını hesaplamak ve sonuçları C sütununda görüntülemek istediğimizi varsayalım.

Bunun için aşağıdaki makroyu oluşturabiliriz:

 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

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Her başlangıç tarihi ile her bitiş tarihi arasındaki tarih sayısı C sütununda gösterilir.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA’da tarihler nasıl karşılaştırılır
VBA kullanarak bir sütunu filtreleme
VBA’da değerler alfabetik olarak nasıl sıralanır