ªð¦^¦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 : ¡i®É¤é²öªÅ¹L¡j¤@­Ó¤H¦b¥@¶¡°µ¤F¦h¤Ö¨Æ¡A´Nµ¥©ó¹Ø©R¦³¦hªø¡C¦]¦¹¥²¶·»P®É¶¡Ävª§¡A¤Á²ö¨Ï®É¤éªÅ¹L¡C
ªð¦^¦Cªí ¤W¤@¥DÃD