Foxtable(狐表)用户栏目专家坐堂 → [求助]如何写保护excel工作表的代码


  共有3709人关注过本帖树形打印复制链接

主题:[求助]如何写保护excel工作表的代码

帅哥哟,离线,有人找我吗?
swimmer01
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:201 积分:2085 威望:0 精华:0 注册:2018/5/4 14:45:00
[求助]如何写保护excel工作表的代码  发帖心情 Post By:2020/1/20 1:27:00 [显示全部帖子]

老师,你好!
我的excel表(文件名:电气设计表.xlsx)中有若干个工作表(图纸目录,材料表,电缆表..),编辑完成后要发给校、审看,我想通过在foxtable中编程,实现在发送前对所有工作表进行加密保护,以免其中数据发生更改,虽然可以在excel程序上完成,但较烦,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
swimmer01
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:201 积分:2085 威望:0 精华:0 注册:2018/5/4 14:45:00
  发帖心情 Post By:2020/1/20 2:24:00 [显示全部帖子]

好像可以用:
    Dim Sheet As XLS.Sheet = Book.Sheets(k)
    Sheet.Locked = True '禁止编辑
锁定工作表,但不知密码咋设?请老师指点,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
swimmer01
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:201 积分:2085 威望:0 精华:0 注册:2018/5/4 14:45:00
  发帖心情 Post By:2020/1/20 11:03:00 [显示全部帖子]

谢谢!!我试一下

 回到顶部