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

编程语言来源：网络编辑：小编更新时间：2026-01-17 20:54:08 浏览量：31

学习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 社群，进行技术交流和提问，获取更多电子资料，并通过社群加入专门的微信讨论群，更方便交流。

到此这篇lodop打印控件（lodop打印控件设置）的文章就介绍到这了,更多相关内容请继续浏览下面的相关推荐文章，希望大家都能在编程的领域有一番成就！

上一篇：制作网页的代码免费（制作一个网页的代码）

下一篇： nvim 配置 maven（npm maven）

版权声明：
本文来自互联网用户投稿，该文观点仅代表作者本人，不代表本站立场。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。
如若内容造成侵权、违法违规、事实不符，请将相关资料发送至xkadmin@xkablog.com进行投诉反馈，一经查实，立即处理！

转载请注明出处，原文链接：https://www.xkablog.com/bcyy/27637.html

相关文章：