在do while循环在Excel VBA
VBA编程语言支持Do While循环。在本文中,我们将学习如何在Excel VBA中使用Do While循环。
Do While循环的语法
VBA Do While循环具有两种语法:
进入控制执行While循环
Do While Condition 'Statement1 'Statement2 '-- '-- 'StatementN Loop
使用此语法,首先检查条件。如果条件匹配,则控制进入循环,否则循环终止。
退出控制执行While循环
Do 'Statement1 'Statement2 '-- '-- 'StatementN Loop While Condition
按照这种语法,控制首先进入循环。执行完每个任务后,VBA最终检查条件。如果条件为True,则Do While循环继续,否则循环立即终止。当您希望循环至少执行一次时,请使用此语法。
示例:删除工作表直到只剩下2张工作表在此示例中,我们将尝试使用VBA Do While循环一张一张地删除每张工作表,直到工作簿中只剩下2张工作表:
上面的子例程将首先检查工作簿是否超过2张纸。如果工作簿有两个以上的工作表,则控件将进入循环并删除当前活动表。循环将继续进行,直到只剩下2张纸为止。
Sub WhileTest() Application.DisplayAlerts = False Do While Sheets.Count > 2 ActiveSheet.Delete Loop Application.DisplayAlerts = True End Sub
如果工作簿已经只有2或1张纸,则控件将不会进入循环并且什么也不会发生。
现在,如果您想在循环开始时至少删除1张纸,即使工作簿只有2张纸,也可以使用退出控件do while循环。
上面的子例程将首先删除1张纸,然后检查那里有几张纸。如果它们大于2页,则循环将继续。如果工作簿剩下2张或更少,则循环将退出。
Sub WhileTest() Application.DisplayAlerts = False Do ActiveSheet.Delete Loop While Sheets.Count > 2 Application.DisplayAlerts = True End Sub
这里的主要收获是,该循环将至少执行一次。
您可以通过询问用户来使用它重复一些任务。例如,您可以要求用户输入密码。并循环播放他,直到他输入正确的密码或退出为止。在这种情况下,您必须至少询问用户一次密码。
注意:我已使用Application对象的DisplayAlert属性来禁用警报。您可以阅读以下内容:“link:/ files-workbook-and-worksheets-in-vba-delete-sheets-without-confirmation-prompts-using-vba-in-microsoft-excel [_here]`.所以,是的,伙计们,这就是Excel VBA中的“ Do While循环”。我希望这是可以解释的。如果对此或任何其他与Excel 365/2019/2016相关的查询有任何疑问。在下面的评论部分询问。
相关文章:
链接:/ vba-for-loops-with-7-examples [7个Microsoft Excel VBA中的For循环示例] for循环是任何编程语言中最常用的循环技术。在VBA中,可以以多种方式使用For循环。
VBA中的If ElseIf语句| If ElseIf是用于返回条件输出的基本条件检查技术。
`链接:/在VBA中删除文件工作簿和工作表-在Microsoft Excel中使用vba删除没有确认提示的工作表[在Microsoft Excel中使用VBA删除没有确认提示的工作表]:*删除工作表时,您会收到确认提示。要禁用它,我们使用应用程序…
在Excel VBA状态栏上显示消息为了在状态栏上显示消息,我们使用Application对象的StatusBar属性。
热门文章:
`链接:/ keyboard-formula-shortcuts-50-excel-shortcuts可提高您的生产率[50 Excel快捷方式以提高生产率]更快地完成任务。这50个快捷键将使您在Excel上的工作速度更快。
Excel中的VLOOKUP函数 |这是excel中最常用和最受欢迎的功能之一,用于从不同范围和工作表中查找值。
在Excel 2016中为COUNTIF使用此惊人的功能对条件进行计数。您无需过滤数据即可计算特定值。
Countif功能对于准备仪表板至关重要。
链接:/ excel-formula-and-function-excel-sumif-function [如何在Excel中使用SUMIF函数]这是仪表板的另一个重要功能。这可以帮助您汇总特定条件下的值。