İçindekiler
Zamanlayıcı Açıklama
Gece yarısından bu yana geçen saniye sayısını temsil eden Tek bir değer döndürür.
Basit Zamanlayıcı Örnekleri
İşte basit bir Zamanlayıcı örneği:
| 123 | Alt Zamanlayıcı_Örnek()MsgBox ZamanlayıcıAlt Bitiş |
Zamanlayıcı Sözdizimi
VBA Düzenleyicisi'nde, Zamanlayıcı işlevinin sözdizimi.
| 1 | zamanlayıcı |
Zamanlayıcı işlevi hiçbir bağımsız değişken içermez:
Excel VBA Zamanlayıcı İşlevi Örnekleri
Aşağıdaki kod örneğini kullanarak lütfen sec1 ve sec2'yi karşılaştırmayı deneyin.
Ardından Timer fonksiyonunun anlamını kolayca öğrenebiliriz.
| 123456789101112131415161718192021222324252627 | Alt Zamanlayıcı_Örnek1()Dim sec1 TekliDim sec2 As Longsec1 = Zamanlayıcısec2 = GetSecondsFromMidnightMsgBox "sec1 = " & sec1 & vbCrLf & _"sec2 = " & sec2Alt BitişGetSecondsFromMidnight() As Long işleviDim dt As TarihDim h Tamsayı OlarakDim m As IntegerDim s As Integerdt = Şimdih = Saat(dt)m = Dakika(dt)s = Saniye(dt)dakika = h * 60 + msaniye = dakika * 60 + sGetSecondsFromMidnight = saniyeBitiş İşlevi |
Zamanlayıcı işlevini kullanarak, VBA Kodunun bir bölümünü çalıştırmanın ne kadar süreceğini ölçebiliriz.
| 1234567891011121314151617 | Alt Zamanlayıcı_Örnek2()Dim startSec As SingleDim endSec As SingleDim kadar uzunstartSec = Zamanlayıcı' VBA Kodunun Test Edilmesinin Başlangıcıi = 1 ila 500000 içinDoEventssonraki ben' Test Edilecek VBA Kodunun SonuendSec = ZamanlayıcıMsgBox "Aldı" & CStr(endSec - startSec) & "s."Alt Bitiş |
