VBA密碼保護Excel工作簿，無需保存

Question

是否可以使用Excel密碼保護打開的Excel工作簿，而無需使用SaveAs方法（不使用任何方法來保存文件）？

當前在我們的應用程序中，在生成工作簿並填充數據后，我們使用SaveAs方法保存和設置密碼。 由於我們使用大量數據，因此生成此工作簿需要一些時間，因此生成的文件很大（120MB）。

我們正在尋找加速工作簿生成的方法，並且發現SaveAs方法大約需要3分鍾才能完成，因為需要計算大量公式。 經過與用戶的簡短交談，我們意識到每個人都對工作簿的UI進行了一些小的更改，因此他們需要再次保存並等待3分鍾。

我們決定取消SaveAs方法，並且由用戶負責在完成更改后保存工作簿。 這就是問題所在，沒有SaveAs，我找不到用密碼保護文件的方法。

我嘗試了Workbook.Protect，但似乎它只能保護結構和窗口不被更改，而不能保護文件不被打開：

ActiveWorkbook.Protect Password:=cPwd, Structure:=True, Windows:=False

我還找到了Workbook.ProtectSharing方法，但是沒有嘗試過，因為文檔說它保存了文件。

因此，有什么方法可以設置工作簿密碼而不保存文件，該文件將在用戶更改后手動保存時應用。

Answer 1

您可以使用Workbook.Password屬性，該屬性是讀/寫的。 下次保存文件時將應用密碼。