Vba excel пауза в макросе

This tutorial will demonstrate how to pause / delay code using the Wait and Sleep functions in VBA.

When we create large VBA programs that perform a lot of calculations, or perhaps even call external program to run, we may require our VBA code to stop running for a specific length of time while the external process is taking place.   VBA has a few methods available in order to achieve this.

Use of Application.Wait Method

If we need to pause our macro’s running for some time or until a specified time has been reached before executing the next step, we can use the Application.Wait method.  This could be useful, for example, if we have automated a login process to a website and need to wait some seconds until the page is loaded before our macro continues running.

Wait 1 Second

Including this line below into your macro, its running will be paused for approximately 1 second:

Application.Wait (Now + TimeValue("0:00:01"))

Wait Until

In some cases you will need to wait until a specific time. With this line below your macro will not proceed before 9am:

Application.Wait "09:00:00"

Please note that the Application.Wait does not accept delays of less than 1 second.

Use of Sleep Method

If you need a more precise way of pausing your macro, you can use the Sleep method.

Sleep is a Windows API function, that is, it is not part of VBA. It can be accessed by using a special declaration statement.

If you are using the 64-bit version of Microsoft Office, you can insert the following statement into a new module or at the beginning of the module (not directly in the subroutine) you want to use the Sleep function in:

Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal Milliseconds As LongPtr)

With 32-bit version use this line:

Public Declare Sub Sleep Lib "kernel32" (ByVal Milliseconds As LongPtr)

After declaring the Sleep function, you have access to it in you subroutines like this:

Sleep 10000

With this line above your macro will be paused for 10,000 milliseconds, i.e., 10 seconds.

Using a Loop with Do Events

The big disadvantage of using the Wait and Sleep methods is that the user cannot do anything in Excel while waiting for the macro to continue.  A user could think that Excel has stopped responding and while the user can then use Ctl+Break to interrupt the macro, this defeats the purpose of putting a pause in the macro to begin with.

To overcome this problem, we can use a loop with a method called DoEvents.

Public Sub Test()
    Dim i As Long
    For i = 1 To 20000
        Range(“A1”).Value = i
        DoEvents
    Next i
End Sub

Now, while Excel is running the macro above, the user can continue to interact with Excel – we can change tabs or format cells for example – basically, the macro is continuing to run but the Excel screen is not frozen.   We could use a similar loop to create a timer function in Excel and incorporate the DoEvents method in that to unfreeze the screen while the timer is running.

Pause VBA Code From Running

VBA Pause one may use to pause the code to execute for a specified amount of time and to pause a code in VBA. We use the application.wait method.

When we build large VBA projects after performing something, we may need to wait for some time to do other tasks. So, how do we pause the macro code to do our task in such scenarios? We can pause the VBA code for a specified period using two functions. Those functions are “Wait” and “Sleep.”

You are free to use this image on your website, templates, etc, Please provide us with an attribution linkArticle Link to be Hyperlinked
For eg:
Source: VBA Pause (wallstreetmojo.com)

How to Pause Code using the Wait Method?

“Wait” is the function in VBAVBA functions serve the primary purpose to carry out specific calculations and to return a value. Therefore, in VBA, we use syntax to specify the parameters and data type while defining the function. Such functions are called user-defined functions.read more to hold the macro running for a specific amount of time. So, by applying this function, we need to know when our code should wait.

You can download this VBA Pause Excel Template here – VBA Pause Excel Template

For example, if executing the code at 13:00:00, if you supply the time as “13:15:00”, it will hold the Macro running for 15 minutes.

Now, look at the argument of the WAIT function in VBAThe In-built VBA Wait Function, also known as Application.Wait method, pauses the program execution for a particular time period (not less than 1 second).read more.

We must mention when our code should pause or wait in the time argument.

For example, look at the below VBA codeVBA code refers to a set of instructions written by the user in the Visual Basic Applications programming language on a Visual Basic Editor (VBE) to perform a specific task.read more.

Code:

Sub Pause_Example1()

Range("A1").Value = "Hello"
Range("A2").Value = "Welcome"

Application.Wait ("13:15:00")

Range("A3").Value = "To VBA"

End Sub

Remember, while running this code, my system time is 13:00:00. As soon as we run the code, it will execute the first two lines i.e.

Range("A1").Value = "Hello” &

Range("A2").Value = "Welcome"

But if you look at the next line, it says Application.Wait (“13:15:00”), so after executing those lines tasks, my Macro will be paused for 15 minutes, i.e., from 13:00:00, it will wait until my system time reaches 13:15:01.

Once my system reaches that time, it will execute the remaining lines of code.

Range("A3").Value = "To VBA"

However, this is not the best way of practicing the pause code. For example, let us say you are running the code at different times. Then we need to use the NOW VBA functionNOW is a date and time function in VBA which is used to get the current system date and time. VBA Now function does not takes any arguments and the return output for this function is date.read more with TIME VALUE function.

Now function returns the current date & time as per the system we are working on.

TIME Value function holds the time from 00:00:00 to 23:59:29.

Assume we need to pause the code for 10 minutes whenever we run the code. Then, we can use the below code.

Code:

Sub Pause_Example1()

Range("A1").Value = "Hello"
Range("A2").Value = "Welcome"

Application.Wait (Now() + TimeValue("00:00:10"))

Range("A3").Value = "To VBA"

End Sub

It is similar to the previous code, but the only difference is we have added the NOW and TIME VALUE function.

Whenever we run this code, it will hold or pause the execution for 10 minutes.

How to Pause the VBA Code using the Sleep Method?

Sleep is a complicated function in VBA because it is not a built-in function. Since it is not built-in to make it available to use, we need to add the code below to the top of our module.

Code:

#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)
#End If
'For 32 Bit Systems

You must copy the above code and paste it at the top of the module.

We need to add the above code because SLEEP is a VBA function presented in Windows DLL files, so we need to declare the nomenclature before we start the subprocedure.

Let us look at the example of the SLEEP function now.

Code:

Sub Pause_Example2()

Dim StartTime As String
Dim EndTime As String
StartTime = Time

MsgBox StartTime

Sleep (10000)

EndTime = Time

MsgBox EndTime

End Sub

First, we have declared two variables as String.

Dim StartTime As String

Dim EndTime As String

Then we assigned the TIME excelTime is a time worksheet function in Excel that is used to calculate time based on the inputs provided by the user. The arguments can take the following formats: hours, minutes, and seconds.read more function to the StartTime variable. The TIME function returns the current time as per the system.

StartTime = Time

Then we have assigned the same to show in the message box.

MsgBox StartTime

Then, we applied the SLEEP function as Sleep (10000).

Here 10000 is milliseconds, which is equal to 10 seconds in VBA.

Then, we have finally assigned one more TIME function to the variable EndTime.

Now again, we have written a code to show the time.

EndTime = Time

It will show the difference between start time and end time.

We will now execute the code and see the start time.

When we execute the code, my system time is 13:40:48. Now, my code will sleep for 10 seconds. So, in the end, my time is as follows.

So, like this, we can pause the code from executing it for a specified time.

Recommended Articles

This article is a guide to the VBA Pause Method. Here, we discuss how to pause code from running using the SLEEP and WAIT for function in Excel VBA with examples and a downloadable Excel sheet. You can learn more about VBA from the following articles: –

• VBA InStr Function
• VBA COUNTIF
• VBA Val Function
• VBA Progress Bar