【发布时间】:2019-02-28 21:18:09
【问题描述】:
所以我正在尝试重置文件中的所有手动分页符。好的,太好了,快速的谷歌搜索让我明白了
.Cells.PageBreak = xlPageBreakNone
太好了,让我们把它和工作表参考一起扔进去
shPrintTemp.Cells.PageBreak = xlPageBreakNone
然后去。
我运行我的代码,我得到“错误 -1004 - 无法设置分页符属性。”
奇怪。让我做更多的研究。我发现其他一些论坛帖子也有类似的问题,提出了类似的解决方案,通常人们说它有效。但是,有时有人会遇到与我相同的错误 - 并且没有发布任何解决方案。
所以我想知道“如果只是一台计算机就是一台计算机怎么办”,然后我重置了 Excel。同样的错误。重置我的电脑。同样的错误。尝试立即窗口,仍然是同样的错误。试试
Wb.Sheets("Print temp").Cells.PageBreak = xlPageBreakNone
同样的错误。
到此为止,我已经束手无策了。
为了防止 XY 问题,我真正想要的是一种快速、干净地删除工作表中所有手动分页符的方法。 (无需核对和重新创建工作表,因为这开始听起来像是一个有吸引力的选择......)。我想这样做的方法是调试分页行,特别是因为似乎没有在线任何地方发布此问题的答案(或在网上很容易找到......)但实际上,任何方式都会对人好点。
【问题讨论】:
-
如果您处于分页预览模式,您必须在上一行之前输入以下行以防止出错:
ActiveWindow.View = xlNormalView