Tag: 滞后

VBA代码 – 跳过一些部分，如果其他人被执行

我已经写了这段代码，但已经消除了之间的额外填充。 根据选定的时间点，它将隐藏适当的行。 容器1将始终被填充，但是，如果没有select另一个容器，我希望它隐藏所有剩余的行而不处理其余的代码。 所以如果容器1和2被选中，它将运行这些代码而不运行其余的代码。 将其重写为循环会非常复杂，因为有很多可能的时间点，所以更多的是跳过与代码无关的问题。 几乎像goto线或什么的？ 我不知道！ 有没有其他方法可以使这段代码比暂时禁用DisplayPageBreaks，ScreenUpdating和Enable Events更有效？ 没有计算在页面上执行，只有行隐藏。 例如，如果Q26是空白的（没有容器2），我希望它到代码的末尾而不处理任何事情，但是我怎么写它，它仍然处理其余的代码。 谢谢你的帮助 If Worksheets("StabDataCapture").Range("q26").Value = "" Then Worksheets("Template").Rows("142:1048576").EntireRow.Hidden = True Else 谢谢你的帮助！ Sub Containers() Dim xPctComp As Integer Application.StatusBar = "Container 1: " & _ Format(xPctComp, "##0%") ActiveSheet.DisplayPageBreaks = False Application.EnableEvents = False Application.ScreenUpdating = False 'CONTAINER 1 ROW HIDES '@@@@@@@@@@@@@@@@@@@@@@@@@@@ 60°C @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 'Show/Hide 1@60 […]