首页 > 解决方案 > Excel VBA 存储 PageSetup 对象

问题描述

是否可以存储用于设置工作表打印选项的 PageSetup 对象?我尝试使用此代码,但收到一条错误消息:未设置对象变量或块变量。这就是我的做法,因为我需要先从表单设置设置,然后使用存储在此对象中的打印设置循环浏览一些工作表。

Dim curPageSetup As PageSetup

curPageSetup.paperSize = xlPaperA3

标签: excelvba

解决方案


如果您只想更改PaperSize书中所有工作表的页数,您可以这样做

Sub SetPaperSize()

    Dim ws As Worksheet
    For Each ws In ActiveWorkbook.Worksheets
        ws.PageSetup.PaperSize = xlPaperA3
    Next ws

End Sub

无需存储PageSetup即可更改其属性


推荐阅读