vba sleep VBA Sleep Snippet

The solution for “vba sleep VBA Sleep Snippet” can be found here. The following code will assist you in solving the problem.

Get the Code! 
Imports System.Threading


Module Module1

    Sub Main(ByVal args As String())

        Dim ts As TimeSpan


        ts = New TimeSpan(0, 0, 1.5)

        Console.WriteLine(“Waiting for 1.5 seconds…”)

        Thread.Sleep(ts)    ‘Pause for duration specified in ts


        ts = New TimeSpan(0, 0, 4)

        Console.WriteLine(“Waiting for 4 seconds…”)

        Thread.Sleep(ts)    ‘Pause for duration specified in ts

    End Sub

End Module#If VBA7 Then Public Declare PtrSafe Sub Sleep Lib “kernel32” (ByVal dwMilliseconds As LongPtr) ‘For 64 Bit Systems#Else Public Declare Sub Sleep Lib “kernel32” (ByVal dwMilliseconds as Long) ‘For 32 Bit Systems#End IfSub SleepTest()MsgBox “Execution is started”Sleep 10000 ‘delay in millisecondsMsgBox “Execution Resumed”End Sub

Thank you for using DeclareCode; We hope you were able to resolve the issue.

More questions on [categories-list]

Similar Posts

exit sub vba

Bym0nxt3r

The solution for “exit sub vba” can be found here. The following code will assist you in solving the problem.Thank you for using DeclareCode; We hope you were able to resolve the issue. More questions on [categories-list]

System.Runtime.InteropServices.COMException: ‘Call was rejected by callee. (Exception from HRESULT: 0x80010001

Bym0nxt3r

The solution for “System.Runtime.InteropServices.COMException: ‘Call was rejected by callee. (Exception from HRESULT: 0x80010001” can be found here. The following code will assist you in solving the problem.Thank you for using DeclareCode; We hope you were able to resolve the issue. More questions on [categories-list]