excel 分页符对打印有什么帮助?

For Each hb In ActiveSheet.HPageBreaks u_row = hb.Location.Row - 1 Range(A & u_row & :J & u_row).Select With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With Next