怎么获取打印页参数

如何获取打印页参数
直接上图

------解决思路----------------------
这个好像不能直接得到（曾经折腾过但没结果），需要计算才有可能得到.......
------解决思路----------------------
PrintArea 属性
参阅应用于示例特性返回或设置欲打印的区域，使用宏语言字符串中以 A1-样式的引用。String 类型，可读写。

说明
将本属性设置为 False 或空字符串 ("")，就可打印整个工作表。

本属性仅适用于工作表页面。

示例
本示例将 sheet1 的打印区域设置为单元格区域 A1:C5。

Worksheets("Sheet1").PageSetup.PrintArea = "$A$1:$C$5"

本示例将 sheet1 的打印区域设置为当前区。注意使用 Address 属性返回 A1-样式的地址。

Worksheets("Sheet1").Activate
ActiveSheet.PageSetup.PrintArea = _
    ActiveCell.CurrentRegion.Address


------解决思路----------------------
找到 ActiveSheet.HPageBreaks 和 VPageBreaks 属性
用 HPageBreaks(1).Location.Row，VPageBreaks(1).Location.Column 可解决问题了