VBA Time işlevi geçerli sistem saatini döndürür.
Time
Time fonksiyonuyla elde edilen zamanı A1 hücresine kaydedelim:
Sub TimeExample1()
Range("A1") = Time
End Sub
Time fonksiyonu tarafından elde edilen zamanın metin formatında görüntülenmesi:
Sub TimeExample2()
MsgBox Format(Time, "hh\hnn") 'Örneğin şunu döndürür: 13h24
End Sub
İşlemi yalnızca saatin en az 17:00 olması durumunda gerçekleştireceğiz:
Sub TimeExample3()
If Hour(Time) >= 17 Then
MsgBox "Gün neredeyse bitti!"
End If
End Sub