EXCEL VB 设置正确的页面布局

Question

我有一个可以从工作表创建 PDF 的宏。 根据用户的笔记本电脑，分页符和大小有所不同。 我读到这是由于屏幕分辨率/Windows 缩放造成的，这似乎是问题所在，因为每个用户在 Windows 中的显示设置中都有不同的比例百分比。 然而，我试图在 VBA 中为每个用户设置它，希望它能工作......但事实并非如此。 除其他代码外，我使用以下

 With snQ.PageSetup
   .Zoom = False
   .FitToPagesTall = 1
   .FitToPagesWide = 3
 End With
snQ.ResetAllPageBreaks
Set snQ.HPageBreaks(2).Location = snQ.Range("B74")
Set snQ.HPageBreaks(2).Location = snQ.Range("B146")
    

这将打印区域设置为 3 页，这就是我想要的。 然而，3 页之间的分页符不会根据每个人的不同而改变（或改变到错误的位置）。 在我看来，当我应用分页符时，页面布局从 1-3 页更改为 %，就好像我进入页面设置时，不再是 1-3，而是缩放 83%（在我的情况下） 有什么想法可以做到这一点吗？谢谢

Answer 1

也许是这样的：

snQ.PageSetup.PrintArea = "$A$1:$K74"

snQ.PrintOut

snQ.PageSetup.PrintArea = "$A$75:$K146"

snQ.PrintOut

等等..