4

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

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

4

1 回答 1

3

这应该让你开始:

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

于 2010-03-29T20:59:23.807 回答