我有一个密码保护的excel文件,我需要在宏中使用,但我担心密码会逐月变化。为了访问该文件,我想创建一个用户表单,以便在每次运行宏时输入密码。以下是我对这个子目标的目标:
我可以自己完成第1步和第3步,但我不确定如何将用户表单合并到此子目录中。你会如何解决这个问题?
答案 0 :(得分:0)
感谢@Scott Craner的小费,我找到了解决方案。这是我使用的:
If MsgBox("Is the APPS Invoice password protected?", vbYesNo, "APPS Invoice") = vbYes Then
pass = Application.InputBox("Please enter the password now:", Type:=2)
End If
On Error GoTo ErrHandler
Set APPSInvoiceWB = Workbooks.Open(APPSInvoiceFN, Password:=pass)
On Error GoTo 0
我使用未受密码保护的文件对其进行了测试,但没有出现问题。我没有通过搜索找到关于这个主题的内容,所以我希望将来能帮助其他人!