Timer ile salise görüntülemek

Katılım
5 Ocak 2009
Mesajlar
1,586
Excel Vers. ve Dili
2003 Türkçe
Selam,
Arkadaşlar Timer ile aşağıdaki gibi Saat: Dakika:Saniye görebiliyorum.
Kod:
MsgBox VBA.TimeSerial(0, 0, Timer)
MsgBox VBA.Format(Timer / 86400, "hh:mm:ss")
MsgBox VBA.FormatDateTime(Timer / 86400, vbLongTime)
Salise'yi nasıl görebilirim? Aşağıdaki gibi yaptım ama pek sağlıklı değil.
Kod:
MsgBox CLng((Timer - WorksheetFunction.RoundDown(Timer, 0)) * 100)
Yardımıcı olabilirseniz sevinirim.
İyi çalışmalar.
 
Katılım
5 Ocak 2009
Mesajlar
1,586
Excel Vers. ve Dili
2003 Türkçe
En kullanışlısı API ile kullanımdır. 1000 ms = 1 sn dir.

http://www.excel.web.tr/f167/timer-uygulamasy-api-class-t42065.html
Sayın Zeki Hocam,
Verdiğiniz linkteki TimerObject(TümVersiyon).xls adlı dosyayı indirdim.
Form(class) 'ı açtım. Alltaki milisaniye gösteren kısım sanırım hatalı çalışıyor.
Eğer saniyenin yüzde birini gösteriyor ise, 0-99 kadar 1 saniye geçmesi lazım. Oysa ki milisaniyeye göre çok yavaş çalışıyor. Kısacası aşağıdaki 2 haneli sayaç birşey ifade etmiyor. 2 haneli sayacın sol taraftaki sayı ile yukarıdaki sayacın saniyesini karşılaştırınız. Sizler de göreceksiniz.
 
Üst