以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于saveexcel方法设密码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63294)

--  作者:998168
--  发布时间:2015/1/18 10:46:00
--  关于saveexcel方法设密码
如题,该方法可以为生成的excel 表同时设上打开密码和修改权限密码吗?
--  作者:有点甜
--  发布时间: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
--  发布时间:2015/1/18 15:21:00
--  
说错了,是设置工作薄的打开密码和修改权限密码不是工作表的密码。
--  作者:有点甜
--  发布时间:2015/1/18 15:26:00
--  
 一样,参考vba帮助文档。