excel中的“SaveAS”宏,带有密码保护

时间:2011-11-23 19:07:30

标签: excel-vba excel-2007 vba excel

嗨我在excel文件中有这个宏:

ActiveWorkbook.SaveAs filename:="C:\SAP Imports\Sales Orders\" & Range("A1") & ".xlsm", FileFormat:= _
        xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
        , CreateBackup:=False

此宏受密码保护。 Whenevr我运行这个我得到“运行时”错误,我无法弄清楚我的代码是什么错误。

我应该写密码而不是写“”。请指教。

2 个答案:

答案 0 :(得分:0)

如果目录不存在,宏将失败。

在运行宏之前,请确保“C:\ SAP Imports \ Sales Orders \”存在。

答案 1 :(得分:0)

我设置了一个同样的工作簿,当我保护宏并将密码放在你显示的行中时,它保存得很好。

然而,当我尝试打开其他工作簿时,这导致了第二个问题。然后我收到一个错误,说文件格式不正确。我删除了".xlsm"并将文件格式更改为fileformat:=52,从而改变了您的行。最终成功了

ActiveWorkbook.SaveAs filename:="C:\SAP Imports\Sales Orders\" & Range("A1"), FileFormat:=52, Password:="password", WriteResPassword:="password", ReadOnlyRecommended:=False, CreateBackup:=False 

当我将其更改为此时,工作簿保存得很好。当我打开保存的书时,它提示我输入上面输入的密码。