{"id":8671,"date":"2023-02-23T02:18:18","date_gmt":"2023-02-23T02:18:18","guid":{"rendered":"https:\/\/www.excel-learn.com\/?p=8671"},"modified":"2024-01-02T11:40:26","modified_gmt":"2024-01-02T11:40:26","slug":"vba-continue","status":"publish","type":"post","link":"https:\/\/www.excel-learn.com\/vba-continue\/","title":{"rendered":"4 Examples as Solution to VBA Continue Statement"},"content":{"rendered":"
\n

How to achieve the 'Continue' Statement Purpose in VBA?<\/strong><\/h3>\n

As we know, VBA has \u201cExit For<\/a>\u201d, and \u201cExit Do\u201d to come out of the loop entirely \u2013 which is achieved by the break statement (normally in other programming languages).<\/p>\n

However, VBA has no Continue<\/strong> statement\u00a0 - to omit an iteration in the loop rather than completely exiting the loop.<\/div>\n

So, how we can achieve this? The topic of our tutorial.<\/p>\n<\/div>\n

First Solution \u2013 Using an If statement in the For loop<\/strong><\/h3>\n

Generally, the continue statement is placed inside the for loop (in any language where it is available).<\/p>\n

We are also using the VBA If statement<\/a> and testing the current value.<\/p>\n

See how we will omit the current iteration while the loop still goes on until the condition is False.<\/p>\n

VBA code to omit an iteration<\/strong><\/p>\n

Sub for_continue()\r\nDim x As Integer<\/a>\r\nDim curr_val\r\n\r\nFor x = 1 To 10 Step 1\r\n\u00a0\u00a0\u00a0 If x = 4 Then\r\n\u00a0\u00a0\u00a0\u00a0 'Do Nothing\r\n\u00a0\u00a0\u00a0 Else\r\n\u00a0\u00a0\u00a0 curr_val = curr_val & vbNewLine & x\r\n\u00a0\u00a0\u00a0 End If\r\n\r\nNext x\r\nMsgBox curr_val\r\n\r\nEnd Sub<\/pre>\n
Output:<\/strong><\/p>\n
\"VBA-continue\"<\/p>\n
You can see, 4 is not displayed in the MsgBox.<\/p>\n
If we have not used the If..Else in the above example, the output should has been:<\/p>\n
\"VBA-simple-For\"<\/p>\n
Omitting multiple iterations<\/strong><\/h3>\n
Just add more items by using the Or operator in the If Statement<\/a> and you may omit more iterations.<\/p>\n
For example, we will omit 3, 5, and 7 values in our above example.<\/p>\n
See the code and output below:<\/p>\n
Code:<\/strong><\/p>\n
Sub for_continue()\r\nDim x As Integer\r\nDim curr_val\r\n\r\nFor x = 1 To 10 Step 1\r\n\u00a0\u00a0\u00a0 'Omit multiple iterations\r\n\u00a0\u00a0\u00a0 If x = 3 Or x = 5 Or x = 7 Then\r\n\u00a0\u00a0\u00a0\u00a0 'Do Nothing\r\n\u00a0\u00a0\u00a0 Else\r\n\u00a0\u00a0\u00a0 curr_val = curr_val & vbNewLine & x\r\n\u00a0\u00a0\u00a0 End If\r\n\r\nNext x\r\n\r\nMsgBox curr_val\r\n\r\nEnd Sub<\/pre>\n
Output:<\/strong><\/p>\n
\"VBA-continue-multiple\"<\/p>\n
VBA \u201cContinue\u201d with Array example<\/strong><\/h3>\n
\n