我正在尝试编写一个宏,可以查看工作表保留的水平分页列表,而HPageBreaks似乎正是所需。我可以向其中添加或删除分页,但似乎无法隔离集合本身以查看其内容。即使添加监视并查看ActiveSheet.HPageBreaks,也只会出现一个计数字段为0的通用对象,而不考虑现有的分页。我现在真的很困惑。有没有办法查看工作表中现有的分页?列出它们出现在哪些行/之间的清单将非常好。
Sub testing()
MsgBox "There are " & ActiveSheet.HPageBreaks.Count & " pagebreaks."
For Each pb In ActiveSheet.HPageBreaks
MsgBox "a page break lies between rows " & pb.Location.Row - 1 _
& " and " & pb.Location.Row
Next
End Sub
这里是一些(相当有限的)参考文献:
http://msdn.microsoft.com/en-us/library/aa661442(office.10).aspx
http://msdn.microsoft.com/en-us/library/aa206426(office.10).aspx