修改excel纸张大小为A5用vba代码怎么写

1、点击顶部“开发工具”菜单下的VB编辑器。

2、在编辑器窗口顶部点击插入模块。

3、在代码编辑窗口输入以下代码，运行即可修改excel纸张大小为A5。

Sub Macro1()

    ActiveSheet.PageSetup.PaperSize = xlPaperA5

End Sub