Excel怎么样才能存盘为“修改受限”形式?(50分)

  • 主题发起人 主题发起人 turbozzh
  • 开始时间 开始时间
T

turbozzh

Unregistered / Unconfirmed
GUEST, unregistred user!
使用OLE方式(CreateOleObject)打开一个预设格式的Excel的文档作为模板,写入数据后,希望存盘能够加上修改权口令(不限制打开)。Delphi语句怎么写才行?
 
没人看?
 
设置只读、打开、隐藏密码即可,
具体怎么写需要查查,但你可以用在Excel中记录宏的方式查到!
 
自己搞定了
存为只读文件的方法

Excel宏:
ActiveWorkbook.SaveAs Filename:= "盘符:/文件夹名/文件名.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="963", ReadOnlyRecommended:= True, CreateBackup:=False

VB语法:
Exwbook.SaveAs FileName:="盘符:/文件夹名/文件名.xls", FileFormat:=xlNormal, Password:="", writerespassword:="963", ReadOnlyRecommended:=False, CreateBackup:=False

Delphi语法:
ExcelApp.ActiveWorkbook.SaveAs('盘符:/文件夹名/文件名.xls',1,'','963',True,False);

另外打开Excel只读文件而不显示确认对话框
ExcelApp.WorkBooks.Open(FileName,True,True);
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部