1. 首页首页
  2. 编程日记编程日记

lodop打印控件（lodop打印控件设置）

编程日记 • • 阅读 4

lodop打印控件（lodop打印控件设置）学习 Excel 技术 关注微信公众号 excelperfect 标签 VBA 需要使用 VBA 代码来设置个人工作簿中所有工作表的打印选项 缩小边距 横向和 A3 纸 VBA 代码如下 Private nbsp Sub PrintSetup Dim ws As Worksheet For Each ws In ThisWorkbook Worksheets 对于工作簿 For Each ws In Application Worksheets 对于个人工作簿



‍
‍学习Excel技术，关注微信公众号：
excelperfect

标签：VBA
需要使用VBA代码来设置个人工作簿中所有工作表的打印选项：缩小边距、横向和A3纸。
VBA代码如下：
Private Sub PrintSetup() Dim ws As Worksheet 'For Each ws In ThisWorkbook.Worksheets ‘对于工作簿 For Each ws In Application.Worksheets  ‘对于个人工作簿   With ws.PageSetup     .LeftMargin = Application.InchesToPoints(0.25)     .RightMargin = Application.InchesToPoints(0.25)     .TopMargin = Application.InchesToPoints(0.75)     .BottomMargin = Application.InchesToPoints(0.75)     .HeaderMargin = Application.InchesToPoints(0.3)     .FooterMargin = Application.InchesToPoints(0.3)     .Orientation = xlLandscape     .PaperSize = xlPaperA3     .Zoom = 100   End With   Application.PrintCommunication = True Next wsEnd Sub
代码很简短。
实际上，可以将打印设置操作使用宏录制器录制下来，然后将录制的代码进行调整简化，这是处理这样的需求最快捷的方法。

欢迎在下面留言，完善本文内容，让更多的人学到更完美的知识。
欢迎到知识星球：完美Excel社群，进行技术交流和提问，获取更多电子资料，并通过社群加入专门的微信讨论群，更方便交流。
‍
‍

编程小号
上一篇 2025-02-19 23:17
下一篇 2025-03-07 13:17

相关推荐

版权声明：本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 举报，一经查实，本站将立刻删除。
如需转载请保留出处：https://bianchenghao.cn/bian-cheng-ri-ji/67321.html