Office中国论坛/Access中国论坛
标题:
[求助]怎样用代码为XLS文件加上密码
[打印本页]
作者:
chul72
时间:
2005-5-28 07:22
标题:
[求助]怎样用代码为XLS文件加上密码
在VBA中怎样用代码为XLS文件加上密码.
作者:
HeyEric
时间:
2005-5-28 08:18
ActiveWorkbook.Password = "helloworld"
哈哈!
作者:
chul72
时间:
2005-5-28 17:40
先谢乐,但我是在ACCESS中导出数据到一个XLS中,然后再用代码加密呀.那个ActiveWorkbook在程序当前并不活呀
作者:
HeyEric
时间:
2005-5-28 18:24
汗一个先;
dim myxls as object
dim myxlsfile
myxlsfile=your path here
set myxls=Getobject(myxlsfile)'先请引用Excel的Lib
myxls.Password="your pwd"
myxls.save
set myxls=nothing
[此贴子已经被作者于2005-5-28 10:24:30编辑过]
作者:
chul72
时间:
2005-5-28 18:46
那这样当我打开这个带密码的文件时呢?其实我的问题是:我想在ACCESS应用中导出全部的用户表数据到一个XLS中作为备份,并为它加上密码.(感谢
HeyEric已帮我解决),但还要为这个应用写个还原数据的功能呀.所以我要以XLS里的SHEET集合为循环条件,将所有的SHEET写回ACCESS的表中,再写回前我还要检查下第一行的每列的值来和ACCESS中的表结构是否相同.
当然这些全部要在ACCESS的VBA中用代码实现.
作者:
HeyEric
时间:
2005-5-28 18:55
我是觉得为什么一定要写到xls里呢,直接把你的用户表export到另外月个DB里,再加个密码(不过我想这样安全性并不高的说。:)),也同样可以实现你的要求的啦。
作者:
chul72
时间:
2005-5-28 19:03
我怕万一出现问题还可以用EXCEL打开它,进行操作.在这个ACCESS应用前一直就是用EXCEL处理的.其实我也是不知道如何处理备份和还原的问题才想出这个笨办法的.
欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)
Powered by Discuz! X3.3