SLEEP関数
Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub testing()
Debug.Print "a"
Sleep (1000) '1000ミリ秒=1秒
Debug.Print "i"
End Sub
Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub testing()
Debug.Print "a"
Sleep (1000) '1000ミリ秒=1秒
Debug.Print "i"
End Sub