本示例显示当前工作表的水平分页符个数。

MsgBox ActiveSheet.HPageBreaks.Count