excel中批量保护或者隐藏工作表效果：当更改b或者d列的条件，对应的工作表就被隐藏或者保护！经常需要将工作表发给老板或者同事，有的表又不想让他们编辑，赶快使用这招保护你的工作表吧：

第一步：批量提取工作表，可以做后续的工作表创建目录链接

Excel制作目录：从多级文件夹中获取名称，并创建链接

按ALT+F11进入vba编辑器，右键插入一个模块，输入以下代码：

Sub 提取表名()

Application.ScreenUpdating = False '取消屏幕更新

Dim i As Integer '定义变量

Sheet9.Cells(1, 3) = "表名" '目录(sheet9)中C1中输入“表名称”

For i = 2 To Sheets.Count '从第2个到最后一个表

Sheet9.Cells(i, 3) = Sheets(i).Name '一直循环取表名放在c列

MsgBox ("提取完毕") '弹出提示框

Application.ScreenUpdating = True '屏幕可以更新

End Sub

二、指定宏，插入一个命令按钮

三、批量隐藏工作表

Sub 隐藏或者取消隐藏()

Application.DisplayAlerts = False

Dim sht As Worksheet

Dim i, irow As Integer

irow = Sheet9.Range("c65536").End(xlUp).Row '确定c列最后一个空行行号

For i = 2 To irow

If Sheet9.Range("b" & i) = "隐藏" Then

For Each sht In Sheets

If sht.Name = Sheet9.Range("c" & i) Then '判断c列中如果有隐藏

sht.Visible = 0 '工作表可见性为0即隐藏

End If

ElseIf Sheet9.Range("b" & i) = "" Then

For Each sht In Sheets

If sht.Name = Sheet9.Range("c" & i) Then

sht.Visible = -1 '如果为空就取消隐藏

End If

Application.DisplayAlerts = True

End Sub

如果是要批量保护或者取消保护就可以修改代码

四、调用宏代码，更改工作表事件

为了防止我们每一次更改条件后都要去执行代码，我们可以在目录表中修改工作事件为【change】就是当这个表中发生了变化就自动帮我们执行保护或者隐藏工作表的代码！

Private Sub Worksheet_Change(ByVal Target As Range)

Call 隐藏或者取消隐藏

Call 保护或者取消保护

End Sub

最后一步步就是将工作表保存为启用宏的工作簿！不然我们写的代码不能保存啦！

WPS小技巧：一键取消隐藏的工作表

Excel中按照条件拆分工作表，我不要在写复杂的函数或者代码了

Excel多表合并与查询，你也试试吧

ndbcluster 批量修改表空间_Excel小技巧：使用这招快速保护你的工作表相关推荐

Python数据分析小技巧：如何在Pandas中实现数据透视表?
Python数据分析小技巧:如何在Pandas中实现数据透视表? 数据透视表是数据分析中非常有用的工具,可以帮助我们快速了解数据的结构.关联和趋势.在Pandas中,我们可以使用pivot_table ...
小技巧：Mac下快速锁屏
小技巧:Mac下快速锁屏 Windows 下用习惯了Win+ L快捷键锁屏,那么Mac下如何操作呢,小编提供两种不用安装任何软件无毒无副作用的方法. 首先开启进入睡眠或开始屏幕保护程序后要求输入密码, ...
如何优化小红书笔记？教你三个小技巧，让你快速提高笔记排名
小红书推广的第一步就是发布笔记,笔记排名越靠前,流量就越大,所以做好笔记很重要,下面教你三个小技巧,让你快速提高笔记排名 1.内容优化笔记内容撰写首先要符合小红书平台规则,原创度高,建议企业从产品卖 ...
用1分钟学会4个PPT高效小技巧，3个小时才能完成的工作5分钟搞定~
制作PPT总是要花费巨长的时间?看过来~用1分钟学会4个PPT高效小技巧,3个小时才能完成的工作5分钟搞定,效率就是这么高~ 1.一秒去动画操作:幻灯片放映-设置幻灯片放映-放映时不加动画 2.抠图 ...
vba复制整个sheet内容_Excel VBA解读（74）：移动或复制工作表——Move方法和Copy方法...
有时候,我们可能想复制工作表,保留一份工作表的副本,以免误操作打乱工作表后无法恢复.有时候,我们也可能想移动工作表,调整工作表顺序,将工作表重新排列,以方便工作表的布置.本文介绍在VBA中实现这两种操 ...
快速对比两张工作表数据差异——《超级处理器》应用
如何快速对比两个工作表数据差异?比如,有下面两张表,一张是审核前的,一张是审核后的,怎么快速找出两张表中不同的单元格. 生产报表审核后生产报表审核前我们很难一眼看出两个表的差异,我们用超级处理器来 ...
mysql查询两个表中的不同数据_如何实现大数据在多工作表中精准查询
大家好,今日继续讲解VBA数据库解决方案,今日讲解第40讲:利用ADO实现同一文件的多个工作表精确查询.其实这讲的内容利用我之前讲解的知识点也可以自己完成.这里只是拿出来让大家再熟悉一下EXCEL的A ...
Excel如何快速汇总多个工作表（格式不同篇）
如下图是某农场1到3月销售表,每个月的销售表分别放在三张工作表中.现在想要汇总这三个月的销售总量. 一. 1.点击如下图选项 2.点击汇总拆分,选择汇总多表图片上传失败重试 3.在汇总区域中输入 ...
Excel怎么快速将多个工作表反向排列
今天跟大家分享一下Excel怎么快速将多个工作表反向排列 1.打开Excel文件,想要将工作表反向排序 2.首先我们点击下图选项(Excel工具箱,百度即可了解详细下载安装信息,本文这里就不做详细解说 ...

ndbcluster 批量修改表空间_Excel小技巧：使用这招快速保护你的工作表

第一步：批量提取工作表，可以做后续的工作表创建目录链接

二、指定宏，插入一个命令按钮

三、批量隐藏工作表

四、调用宏代码，更改工作表事件

最后一步步就是将工作表保存为启用宏的工作簿！不然我们写的代码不能保存啦！

ndbcluster 批量修改表空间_Excel小技巧：使用这招快速保护你的工作表相关推荐

最新文章

热门文章