Vba'da timevalue fonksiyonu nasıl kullanılır (örnekle)

Belirli bir dizenin zaman değerini döndürmek için VBA’daki TimeValue işlevini kullanabilirsiniz.

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

 Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range(" B " & i) = TimeValue(Range(" A " & i))
Next i
    
End Sub

Bu özel makro, A2:A7 aralığındaki tarih ve saatlerin zaman değerini çıkaracak ve bu zaman değerini karşılık gelen B2:B7 aralığında döndürecektir.

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

Örnek: VBA’da TimeValue işlevi nasıl kullanılır?

Excel’de aşağıdaki tarih/saat sütununa sahip olduğumuzu varsayalım:

A sütunundaki her tarih saatinden saati çıkarmak ve B sütununda görüntülemek istediğimizi varsayalım.

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

 Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range(" B " & i) = TimeValue(Range(" A " & i))
Next i
    
End Sub

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

B Sütunu, A sütunundaki her tarih/saat için zaman değerini görüntüler.

Örneğin:

• TimeValue işlevi 01/01/2023 10:15:34 itibarıyla 10:15:34 değerini döndürür
• TimeValue işlevi, 03/01/2023 12:34:18 itibarıyla 12:34:18 PM değerini döndürür
• TimeValue işlevi 01/05/2023 8:23:00 itibarıyla 8:23:00 değerini döndürür

Ve benzeri.

Not : VBA’daki TimeValue işlevinin tam belgelerini 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 kullanarak zaman damgası nasıl eklenir
VBA’da saat nasıl biçimlendirilir