Question

我正在尝试编写一个宏，它可以查看工作表保留的水平分页符列表，看起来HPageBreaks应该就是这样。我可以添加或删除分页符，但我似乎无法隔离集合本身来查看其内容。即使添加一个手表并查看ActiveSheet.HPageBreaks，也只会显示一个通用外观对象，其count字段等于0，而不管现有的分页符。

我现在真的很困惑。有没有办法查看工作表中的现有分页符？列出它们之间/之间出现的行会很棒。

Answer 1

这应该让你开始：

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

excel 2007 vba：如何引用HPageBreaks

1 个答案: