ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

API Timer «ç»ò¥Î??

API Timer «ç»ò¥Î??

½Ð°Ý¦b«Å§iAPI¨ç¼Æ«á, Timer ­n«ç»ò¥s¥X¨Ó?? ´N¬Oª½±µ©µ¥Î "Timer"¶Ü??
¨Ò¦p³o¼Ë¶Ü?       Range("a1")=Timer

¦pªG¥Î¤U­±³oºØ¤è¦¡·|¦³delayªº±¡ªp(¥i¯à¬O¦]¬°CPU±Æµ{ªº°ÝÃD§a!?)
Sub Asub()
With ActiveSheet.Range("a1")
    .Value = .Value + 0. 1
End With
End Sub

Sub tt()
SetTimer Application.hWnd, 1, 100, AddressOf Asub
End Sub

¦pªG¥i¥s¥XAPIªºTimer ²z½×¤W´N¤£·|ºC¤F§a!?
¥t¥~....¤@¯ëExcelªºTimer¨ç¼Æºë½T«×¬O1/64¬í ?
             ¨ºAPIÅ¥»¡¥i¨ì1/1000 ¬í??¯uªº¶Ü?
ªì¾ÇªÌcolor

        ÀR«ä¦Û¦b : ¤f»¡¦n¸Ü¡B¤ß·Q¦n·N¡B¨­¦æ¦n¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD