首页 > 解决方案 > .Cells.PageBreak = xlPageBreakNone 错误 -1004 - 无法设置分页符属性

问题描述

因此,我正在尝试重置文件中的所有手动分页符。好的,太好了,快速的谷歌搜索让我明白了

.Cells.PageBreak = xlPageBreakNone

太好了,让我们把它和工作表参考一起扔进去

shPrintTemp.Cells.PageBreak = xlPageBreakNone

去。

我运行我的代码,我得到“错误 -1004 - 无法设置分页符属性”。

奇怪的。让我做更多的研究。我发现其他一些论坛帖子也有类似的问题,提出了类似的解决方案,通常人们说它有效。但是,偶尔有人会遇到我遇到的相同错误 - 并且没有发布任何解决方案。

所以我想知道“如果它只是一台计算机是一台计算机怎么办”,我重置了 Excel。同样的错误。重置我的电脑。同样的错误。尝试立即窗口,仍然是同样的错误。尝试

 Wb.Sheets("Print temp").Cells.PageBreak = xlPageBreakNone

同样的错误。

我在我的智慧在这里结束。

为了防止 XY 问题,我真正想要的是一种快速、干净地删除工作表中所有手动分页符的方法。(无需核对和重新创建工作表,因为这开始听起来像是一个有吸引力的选择......)。我想这样做的方法是调试分页符,特别是因为似乎没有在网上任何地方发布这个问题的答案(或在网上很容易找到......)但实际上,任何方式都会对人好点。

标签: excelvbaprinting

解决方案


请通过以下方式重置所有分页符
Worksheet.ResetAllPageBreaks

(您的案例shPrintTemp.ResetAllPageBreaks
Wb.Sheets("Print temp").ResetAllPageBreaks两者都有效)


推荐阅读