请教EXCEL工作簿隐藏或者单独加密

yangzhichao0811 · 发表于 2019-1-3 16:07

目前我的Excel表格有sheet1、sheet2、sheet3三个工作表。其中sheet1是有计算过程的，sheet2和sheet3是从sheet1中关联的数据。
我需要每天把Excel发给其他人员，但是不能让他看到sheet1，只看sheet2和sheet3
有没有什么办法可以让sheet1加密可见，而sheet2和sheet3不加密。
第二个问题，我尝试了分拆成Excel1和Excel2，Excel2是从Excel1中关联的数据，但是我不发送Excel1，Excel2就是数据不可见的，这个有什么办法解决吗

朔方 · 发表于 2019-1-3 21:14

VBA 深度隐藏即可

刀羊 · 发表于 2019-1-3 23:10

既然让它可见不可改，可以复制一个图片放在一个工作表内，真实的工作表通过VBE做深度隐藏。
不过这个只能对一部分用户有效。

gui3110644111 · 发表于 2019-1-4 08:52

本帖最后由 gui3110644111 于 2019-1-4 09:41 编辑

第一个问题，在sheet1上右键就能隐藏，至于加密，可以用VBA实现sheet1选中状态提示输入密码；
第二个问题，你说的这个不能解决，你工作簿1引用了工作簿2的内容，如果工作簿不存在那肯定会数据丢失；

第一个问题实现的思路如下代码（操作方法：ALT+F11，复制下面内容到Sheet1粘贴，可见附件）
Private Sub Worksheet_Activate() '激活工作表触发的程序
Cells.Font.Color = RGB(255, 255, 255) '全部单元格字体设置成白色
yecg_i = InputBox("请输入密码") '提示输入密码框
If yecg_i = 123 Then             '对输入的密码进行判断
Sheet1.Visible = True       '使Sheet1工作表可见
Cells.Font.Color = RGB(0, 0, 0) '全部字体设置成黑色
Else
Sheet1.Visible = False       '密码错误就隐藏Sheet1
End If
End Sub

密码保护Sheet1.rar (13.92 KB, 下载次数: 55)

shaokui123 · 发表于 2019-11-5 11:42

gui3110644111 发表于 2019-1-4 08:52
第一个问题，在sheet1上右键就能隐藏，至于加密，可以用VBA实现sheet1选中状态提示输入密码；
第二个问题 ...

如果禁用宏是不是就没用了

		自动登录	找回密码
密码			免费注册

[求助] 请教EXCEL工作簿隐藏或者单独加密