利用VBA打印隐藏的excel工作表
发布时间：2022-11-19 12:33:00
标签：代码,工作,打印,隐藏,Excel函数
如果一个工作簿中包含许多工作表，其中还有一些是隐藏的，我们可以用VBA代码来直接打印所有隐藏的工作表，而无需将它们取消隐藏。由于Excel无法打印隐藏的工作表，下面的代码先取消工作表的隐藏，打印之后再将其隐藏起来。将代码放入VBA编辑器的标准模块中运行。
Sub PrintHiddenSheets()
Dim wSheet As Worksheet
Dim CurStat As Variant
For Each wSheet In ActiveWorkbook.Worksheets
If Not wSheet.Visible Then
CurStat = wSheet.Visible
wSheet.Visible = xlSheetVisible
‘打印预览，如果要打印用 wSheet.PrintOut
wSheet.PrintPreview
wSheet.Visible = CurStat
End If
Next
End Sub
0
投稿猜你喜欢
每当我们使用的系统遇到各种问题，有很多解决方法，比如系统还原、重装系统、恢复出厂设置等等的方法。当一个用户使用电脑的还原功能的时候，却出现了- 微软发布了Win10基础镜像WIM。该镜像的15031预览版（英文版）已经添加，有需要的开发者可下载使用，下面就详情来看看了解下2月9日为了
- 很多小伙伴都认为那种看起来特别炫酷的二维码都是由专门的软件做的，所以每次看到别人设计的二维码都觉得特别羡慕，但是却不知道在我们经常使用的WP
- QQ输入法手机版卸载的方法如下：进入手机工具或者设置目录，运行程序管理，选择删除QQ输入法(手机版)。如果在卸载过程中，系统提示:无法卸载，
- excel如何把日期yy-mm-dd变成yy/mm/dd/格式步骤1、打开excel表，这个表是我做演示案例用的，仅供参考。因为智修改日期，
- 可能有很多Win7用户不知道怎么设置系统自动关闭。如果用户长时间不使用电脑，还忘记关闭电脑，长期以往非常的耗电，那么我们要怎么设置电脑自动关
- AMD GPU显卡已经进入14nm FinFET工艺和“Polaris”(北极星)架构时代，并即将迎来更高端、更强大的“Vega”(织女星)
- 在Win7中，备份分为两种：备份整个系统和备份系统设置/创建系统修复盘。其中，系统备份是最彻底的备份，可将将整个系统集成到一个映像文件中，在
- 如何更新Win10专业版驱动程序？驱动程序不兼容时可能会导致一系列的问题，如显示屏的分辨率不正确或电脑没有声音等情况，此时我们就需要更新Wi
- Win10很多用户在使用了很久的电脑之后想让它休息一下让它进入休眠模式，但是突然到要用的时候却没有办法唤醒屏幕怎么操作都没用，每次都只能通过
- 网页显示白屏这个故障很多用户都碰到过，包括小编自己也曾遇到这样的状况。那么，使用IE9浏览器打开网页显示白屏到底是什么原因呢?今天小编就将自
- 今天微软推送了Win10 Mobile创意者更新快速预览版15063.2，暂时只有手机版更新，这个版本只是修复了一些细小的系统B
- 如果是一篇比较长的Word文档，可能有几十上百幅图片，在修改的图片过程中，整个文章都可能需要重新编号，这可不是一
- win11任务管理器在哪打开？任务管理器是Windows系统中一项非常实用的功能。不过在最新版Win11中，右击任务栏启动任务管理器的入口被
- 我们来学习Excel的数据排序。PS:适合入门级，大神勿喷。数据排序的基本操作很简单。以下是小编为您带来的关于Excel案例操作弄清数据排序
- 说明：截止目前CentOS 6.x最新版本为CentOS 6.8，下面介绍CentOS 6.8的具体安装配置过程服务器相关设置如下：操作系统
- 固态硬盘的好处是什么?电脑使用固态硬盘有什么用?很多用户都有这样的疑问，电脑都搭配SSD固态硬盘，给人的感觉是SSD固态硬盘，可以大幅提升我
- Win10上如果有重要的文件，想一次性永久删除，而不用再去回收站清空。接下来本文给大家大家带来两种Win10永久删除文件方法，感兴趣的朋友一
- 第一种方法：1.首先，返回到win7电脑的桌面位置，之后，在桌面找到一个空白处，点击鼠标右键，在下滑菜单中选择个性化，之后，在打开的个性化窗
- 外星人X15 R2是一款游戏型便携笔记本电脑，采用了intel第十二代酷睿i7处理器以及性能级核芯显卡，能够满足用户们日常娱乐使用需求，那么
