Vba'da dateserial fonksiyonu nasıl kullanılır (örnekle)
Belirli bir gün, ay ve yılın tarihini döndürmek için VBA’daki DateSerial işlevini kullanabilirsiniz.
Bu işlevi pratikte kullanmanın yaygın bir yolu aşağıda verilmiştir:
SubUseDateSerial ()
Dim i As Integer
For i = 2 To 13
Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B " & i), Range(" A " & i))
Next i
End Sub
Bu özel makro, C sütunundaki yıl değerlerini, B sütunundaki ay değerlerini ve A sütunundaki gün değerlerini kullanarak D2:D13 aralığındaki tarih değerlerini döndürecektir.
Aşağıdaki örnek, DateSerial işlevinin pratikte nasıl kullanılacağını gösterir.
Örnek: VBA’da DateSerial işlevi nasıl kullanılır?
Excel’de farklı tarihler için günü, ayı ve yılı görüntüleyen aşağıdaki sütunlara sahip olduğumuzu varsayalım:
Her satırdaki gün, ay ve yıl değerlerini kullanarak tarih değerlerini D sütununda görüntülemek istediğimizi varsayalım.
Bunun için aşağıdaki makroyu oluşturabiliriz:
SubUseDateSerial ()
Dim i As Integer
For i = 2 To 13
Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B " & i), Range(" A " & i))
Next i
End Sub
Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:
D sütunu sırasıyla A, B ve C sütunlarındaki gün, ay ve yıl değerlerinin kullanılmasıyla elde edilen tarih değerini görüntüler.
Not : VBA DateSerial işlevine ilişkin tüm belgeleri burada bulabilirsiniz.
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’da tarihi hafta numarasına dönüştürme
VBA’da iki tarih arasındaki günler nasıl hesaplanır