Vba: bagaimana cara menambahkan if di antara dua tanggal

Anda dapat menggunakan sintaks berikut di VBA untuk menghitung jumlah jika sel berada di antara dua tanggal:

 Sub SumifBetweenDates()
Range(" E3 ") = WorksheetFunction.SumIfs(Range(" B2:B9 "), Range(" A2:A9 "), " >= " & [E1], _
                                                       Range(" A2:A9 "), " <= " & [E2])
End Sub

Contoh khusus ini akan menjumlahkan nilai dalam rentang B2:B9 hanya jika tanggal dalam rentang A2:A9 berada di antara tanggal mulai di sel E1 dan tanggal akhir di sel E2 .

Jumlahnya kemudian akan ditampilkan di sel E3 .

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Bagaimana cara menambahkan If di antara dua tanggal di VBA

Misalkan kita memiliki kumpulan data berikut yang berisi informasi tentang jumlah total produk yang terjual pada tanggal berbeda di toko ritel:

Katakanlah kita ingin menghitung jumlah penjualan hanya untuk tanggal antara 01/07/2023 dan 26/01/2023 .

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub SumifBetweenDates()
Range(" E3 ") = WorksheetFunction.SumIfs(Range(" B2:B9 "), Range(" A2:A9 "), " >= " & [E1], _
                                                       Range(" A2:A9 "), " <= " & [E2])
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Perhatikan bahwa sel E3 berisi nilai 16 .

Ini mewakili penjumlahan nilai pada kolom penjualan yang tanggalnya antara 01/07/2023 hingga 26/01/2023.

Kami dapat memverifikasi kebenarannya dengan menghitung secara manual jumlah nilai di kolom Penjualan di mana nilai terkait di kolom Tanggal adalah antara 01/7/2023 dan 26/01/2023:

Jumlah penjualan: 3 + 7 + 6 = 16 .

Ini sesuai dengan nilai yang dihitung oleh VBA.

Perhatikan bahwa jika Anda mengubah nilai tanggal mulai dan akhir masing-masing di sel E1 dan E2 , dan menjalankan makro lagi, ini akan menghitung jumlah penjualan untuk tanggal baru.

Catatan : Diasumsikan nilai pada kolom tanggal sudah berformat tanggal di Excel.

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menulis fungsi SUMIF dan SUMIFS
VBA: Cara menulis fungsi COUNTIF dan COUNTIFS
VBA: Cara menulis fungsi AVERAGEIF dan AVERAGEIFS