Excel 打开电子表格并自动输入链接电子表格的密码
我有一个电子表格设置,其中有一些公式链接到受保护的电子表格(示例B),这意味着即使我的初始电子表格(示例a)如果未受保护,每次更新数据时我都必须输入另一个的密码-是否有任何方法可以添加一些VBA,以便在打开ExA时自动输入ExB的密码 我在ExA中尝试了以下作为私人密码的密码,但没有任何乐趣,它仍然要求输入密码Excel 打开电子表格并自动输入链接电子表格的密码,excel,vba,Excel,Vba,我有一个电子表格设置,其中有一些公式链接到受保护的电子表格(示例B),这意味着即使我的初始电子表格(示例a)如果未受保护,每次更新数据时我都必须输入另一个的密码-是否有任何方法可以添加一些VBA,以便在打开ExA时自动输入ExB的密码 我在ExA中尝试了以下作为私人密码的密码,但没有任何乐趣,它仍然要求输入密码 Private Sub Workbook_Open() Workbooks.Open Filename:="file path", Password:="Password" End
Private Sub Workbook_Open()
Workbooks.Open Filename:="file path", Password:="Password"
End Sub
如果只有工作表受保护,而不是整个工作簿,请尝试使用:
Sub uncode()
'code to unprotect
Sheets("Sheet1").Unprotect "password"
'your code, updating data
'code to protect
Sheets("Sheet1").Protect "password"
End Sub
不要试图从第一个工作簿打开第二个工作簿。试试这个
Private Sub Workbook_Open()
Dim wbA As Workbook
Dim wbB As Workbook
Set wbB = Workbooks.Open(Filename:="C:\SomePath\ExB.xlsx", Password:="SomePassword")
Set wbA = Workbooks.Open(Filename:="C:\SomePath\ExA.xlsx", Password:="SomePassword")
wbB.Close (False)
End Sub
链接的工作簿受到保护,我希望VBA所在的工作簿没有保护。如果整个工作簿受到保护,那么您就倒霉了。如果可能的话,您应该考虑将其转换为数据库。您是否尝试过工作簿。打开文件名:=“文件路径”,密码:=“通过打开”,写入密码:=“通过重写”?