如何用VBA打印隐藏的工作表？

作者：绿色风分类：时间：2022-08-17 浏览：85

楼主 wise	Q:如何用VBA打印隐藏的工作表？一个工作簿中包含多个工作表，其中部分工作表是隐藏的，可以使用VBA代码来直接打印所有隐藏的工作表，而无需将它们取消隐藏。由于Excel无法打印隐藏的工作表，可以先取消工作表的隐藏，打印之后再将其隐藏起来。 A：ALT+F11→插入模块→输入代码： Sub 打印隐藏的工作表() Dim Ws As Worksheet Dim CurStat As Variant For Each Ws In ActiveWorkbook.Worksheets If Not Ws.Visible Then CurStat = Ws.Visible Ws.Visible = xlSheetVisible '打印预览，如果要打印用 wS.PrintOut Ws.PrintPreview Ws.Visible = CurStat End If Next End Sub VBA.rar
2楼亡者天下	隐藏工作表，不错！
3楼纵鹤擒龙水中月	不错！

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表