Vba: tarihten ay adı nasıl alınır

Excel’deki bir tarihten ay adını almak için VBA’daki MonthName işlevini kullanabilirsiniz.

Bu işlevi pratikte kullanmanın yaygın bir yolu aşağıda verilmiştir:

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i) = MonthName(Month(Range(" A " & i)))
Next i

End Sub

Bu özel makro, A2:A11 aralığındaki her tarihin ay adını bulur ve bu adları C2:C11 aralığındaki karşılık gelen hücrelerde görüntüler.

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

Örnek: VBA kullanılarak tarihten ay adı nasıl alınır?

Bir şirketin farklı tarihlerde yaptığı satışlara ilişkin bilgileri içeren Excel’de aşağıdaki veri setine sahip olduğumuzu varsayalım:

Tarih sütunundaki her hücre için ay adını almak istediğimizi varsayalım.

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

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i)= MonthName(Month(Range(" A " & i)))
Next i

End Sub

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

C sütununun, A sütununda karşılık gelen her tarihin ay adını içerdiğini unutmayın.

Bunun yerine kısaltılmış ay adını döndürmek istiyorsanız, MonthName işlevinde aşağıdaki gibi isteğe bağlı bir True bağımsız değişkeni kullanabilirsiniz:

 SubGetMonthName ()

Dim i As Integer

For i = 2 To 11
    Range(" C " & i)= MonthName(Month(Range(" A " & i)), True )
Next i

End Sub

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

C sütunu artık A sütunundaki her eşleşen tarih için kısaltılmış ay adını içeriyor.

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 dizeyi tarihe dönüştürme
VBA’da iki tarih arasındaki günler nasıl hesaplanır