엑셀
엑셀 매크로 VBA 나의 함수 딜레이
아스C#
2018. 11. 18. 00:00
반응형
엑셀 매크로 VBA 나의 함수 딜레이
Public Declare Function GetTickCount Lib "kernel32" () As Long
Public Function Delay(xxx As Single) As Single
Dim X As Single
Dim xx As Single
X = GetTickCount()
Do While (xx - X) / 1000 < xxx
DoEvents
xx = GetTickCount
Loop
Delay = X
End Function
반응형