表格自动设置的密码是什么？

foxlyy · 发表于 2022-11-27 20:46

本帖最后由 foxlyy 于 2022-11-28 07:06 编辑

请教各位高手，表格自动设置密码，看工作表2,第一列，256行单元格却没有内容，

如果在256行输入1，解保护的密码也不是1，提示密码不正确，那密码应该是什么呢？

代码如下：

Private Sub Worksheet_Activate()

Dim pass As String

pass = CStr(Sheets(2).Cells(1, 256).Text)

Application.CellDragAndDrop = False

ActiveSheet.Unprotect Password:=pass

Range("C6", "D65536").NumberFormatLocal = "@"

ActiveSheet.Protect Password:=pass, DrawingObjects:=True, Contents:=True

End Sub

582766 · 发表于 2022-11-27 22:12

激活事件，打开就会执行，密码工作表2里面,第一列，256行单元格内容

foxlyy · 发表于 2022-11-28 06:54

582766 发表于 2022-11-27 22:12
激活事件，打开就会执行，密码工作表2里面,第一列，256行单元格内容

谢谢你的回复，可是工作表2,第一列，256行单元格内容是空的，我输入内容，如1，撤消保护表的密码输入1，也不行

aecn · 发表于 2022-11-28 10:06

可能是个隐藏工作表

smsn · 发表于 2022-11-28 14:23

运行下 msgbox Sheets(2).Cells(1, 256)

foxlyy · 发表于 2022-11-28 16:23

本帖最后由 foxlyy 于 2022-11-28 16:27 编辑

582766 发表于 2022-11-28 09:28
祝你工作顺利事事如意

谢谢你的帮忙，密码原来在第一行的256列

foxlyy · 发表于 2022-11-28 16:24

aecn 发表于 2022-11-28 10:06
可能是个隐藏工作表

问题解决了，没有隐藏表

foxlyy · 发表于 2022-11-28 16:25

smsn 发表于 2022-11-28 14:23
运行下 msgbox Sheets(2).Cells(1, 256)

谢谢你，找到密码了，原来密码在第一行的256列

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

[求助] 表格自动设置的密码是什么？