Foxtable(狐表)用户栏目专家坐堂 → 关于saveexcel方法设密码


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

主题:关于saveexcel方法设密码

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


加好友 发短信
等级:童狐 帖子:241 积分:2208 威望:0 精华:0 注册:2012/11/21 0:48:00
关于saveexcel方法设密码  发帖心情 Post By:2015/1/18 10:46:00 [只看该作者]

如题,该方法可以为生成的excel 表同时设上打开密码和修改权限密码吗?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/18 10:53:00 [只看该作者]

 需要用vba打开excel再设置,参考

 

Protect

保护工作表。
Protect方法可以指定保护密码参数,该密码为一个区分大小写的字符串。如果省略本参数,不用密码就可以取消对该工作表的保护。如:

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets("同期对比")
Ws.Protect(Password:="hhh")  '以密码保护
Wb.Save
App.Quit

 

http://www.foxtable.com/help/topics/2121.htm

 


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


加好友 发短信
等级:童狐 帖子:241 积分:2208 威望:0 精华:0 注册:2012/11/21 0:48:00
  发帖心情 Post By:2015/1/18 15:21:00 [只看该作者]

说错了,是设置工作薄的打开密码和修改权限密码不是工作表的密码。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/1/18 15:26:00 [只看该作者]

 一样,参考vba帮助文档。

 回到顶部