类似附件中的excel表格，前2行是固定的打印标题行，然后除了第一页是34行以外，其余各页均为32行。
现在需要对每页的最后一行进行处理，所以需要先获得每页最后一行的内容，请问是否可以用VBA代码实现
------最佳解决方案--------------------------------------------------------
A = ActiveSheet.HPageBreaks.Count
Do
I = I + 1
MsgBox Sheet1.HPageBreaks(I).Location.Row - 1
Loop Until I = A
这个代码可以达到你的要求！