如何获取excel每页的最后一行
类似附件中的excel表格，前2行是固定的打印标题行，然后除了第一页是34行以外，其余各页均为32行。
现在需要对每页的最后一行进行处理，所以需要先获得每页最后一行的内容，请问是否可以用VBA代码实现
[最优解释]
A = ActiveSheet.HPageBreaks.Count
Do
I = I + 1
MsgBox Sheet1.HPageBreaks(I).Location.Row - 1
Loop Until I = A
这个代码可以达到你的要求！
发布时间： 2012-12-22 12:05:07 作者： rapoo
如何获取excel每页的最后一行
类似附件中的excel表格，前2行是固定的打印标题行，然后除了第一页是34行以外，其余各页均为32行。
现在需要对每页的最后一行进行处理，所以需要先获得每页最后一行的内容，请问是否可以用VBA代码实现
[最优解释]
A = ActiveSheet.HPageBreaks.Count
Do
I = I + 1
MsgBox Sheet1.HPageBreaks(I).Location.Row - 1
Loop Until I = A