如何使用用户表单在宏中打开受密码保护的文件？

Question

我有一个密码保护的excel文件，我需要在宏中使用，但我担心密码会逐月变化。为了访问该文件，我想创建一个用户表单，以便在每次运行宏时输入密码。以下是我对这个子目标的目标：

1. 选择要打开的文件
2. 在用户表单中输入密码（如果文件受保护）
3. 使用所选路径和密码打开文件。

我可以自己完成第1步和第3步，但我不确定如何将用户表单合并到此子目录中。你会如何解决这个问题？

Answer 1

感谢@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

我使用未受密码保护的文件对其进行了测试，但没有出现问题。我没有通过搜索找到关于这个主题的内容，所以我希望将来能帮助其他人！