小编AMM*_*AMM的帖子

Excel 2010 只允许通过文件→选项→高级→“此工作表的显示选项”一次为一个工作表打开或关闭分页符：

我以前想出了一个 VBA 宏来切换分页符，但它只适用于我有活动的工作表：

Sub TogglePageBreaks()

    ActiveSheet.DisplayPageBreaks = Not ActiveSheet.DisplayPageBreaks

End Sub

下一个合乎逻辑的问题（其他人必须向我指出）是如何使用宏来切换活动工作簿中所有工作表的分页符显示？

作为 VBA 的新手，我花了几个小时研究如何循环工作表以及 DisplayPageBreaks 对象的工作原理。我在下面想出了一个答案。