求教一个VBA语法

wancheng · 发表于 2012-7-9 16:39

我想使用按钮另存文件，需要加上只读属性，由于选择ThisWorkbook.SaveCopyAs Filename 目的想达到保存不弹出新表窗口的目的。现查询网上资料没有显示有添加文件显示的条件，提示是未找到命名参数。请教一下是否可以有合适的条件添加相关信息。谢谢！
ThisWorkbook.SaveCopyAs Filename:=myf4 & Format(Date, "yyyy-m-d") & Format(Time, " hh：mm：ss") & ".xlsm", Password:="", WriteResPassword:="produce", ReadOnlyRecommended:=True, CreateBackup:=False

bjjgq · 发表于 2012-7-9 17:27

设置一个saved属性就可以了
object.saved=ture

wancheng · 发表于 2012-7-14 11:09

好像还没能设置只读密码
用SetAttr , vbHidden + vbReadOnly 可能不能完全保证惟一性

		自动登录	找回密码
密码			注册

求教一个VBA语法

相关帖子