Why don’t you open all 25 workbooks, update all links, then close the workbooks?
![]() |
Patch reliability is unclear. Unless you have an immediate, pressing need to install a specific patch, don't do it. |
SIGN IN | Not a member? | REGISTER | PLUS MEMBERSHIP |
-
Update links from password protected workbooks (07
Home » Forums » AskWoody support » Productivity software by function » MS Excel and spreadsheet help » Update links from password protected workbooks (07
- This topic has 3 replies, 3 voices, and was last updated 17 years, 7 months ago.
Viewing 0 reply threadsAuthorReplies-
WSgvanhook
AskWoody LoungerNovember 13, 2007 at 8:52 pm #1083607(Edited by HansV to provide link to post – see Help 19)
I have a project I have been asked to complete. We have a folder that contains about 25 workbooks that are each protected by their own unique password. I have been asked to create a summary workbook that contains the data from certain cells of each of these individual workbooks.
I have created a workbook with links to the data that I need to summarize, but each time I open the workbook I am asked to supply the password for each of the 25 files.
I found some code (post 675,462) in the lounge that will allow me to open each of the files, using a for/next loop but I am stumped on how to force the individual links to update while the workbook is open. Is there a piece of code that I can insert before the wkb.Close that will force the link to that workbook to update?Thanks in advance for any help you can provide. The code I am using is below.
Private Sub Workbook_Open()
Dim wkb As Workbook
Dim rng As Range
Dim rCell As Range
Dim sPath As String
Dim sFile As String
Dim sPassword As String
Dim sSummary As String‘set range for the path
Set rng = Range(“B:B25”)
Set sSummary = “Monthly_review_linked.xlsm”
For Each rCell In rng
sPath = rCell.Value
sPassword = rCell.Offset(0, 1).Value
sFile = rCell.Offest(0, 2).Value
Set wkb = Application.Workbooks.Open( _
Filename:=sPath, Password:=sPassword)wkb.Close (False)
Next
Set rCell = Nothing
Set rng = Nothing
Set wkb = Nothing
End Sub -
WSsdckapr
AskWoody LoungerNovember 14, 2007 at 2:05 pm #1083795You can use the “UpdateLinks” parameter in the OPEN command
From XL 2002 VBA Help on Workbooks.Open
[indent]
UpdateLinks Optional Variant. Specifies the way links in the file are updated. If this argument is omitted, the user is prompted to specify how links will be updated. Otherwise, this argument is one of the values listed in the following table.
Value Meaning
0 Doesn’t update any references
1 Updates external references but not remote references
2 Updates remote references but not external references
3 Updates both remote and external references
[/indent]
So you would do something like:
Set wkb = Application.Workbooks.Open( _
Filename:=sPath, Password:=sPassword, _
UpdateLinks:=3)to Update both remote and external references when each file is opened.
Steve -
WSgvanhook
AskWoody Lounger
-
-
Viewing 0 reply threads -

Plus Membership
Donations from Plus members keep this site going. You can identify the people who support AskWoody by the Plus badge on their avatars.
AskWoody Plus members not only get access to all of the contents of this site -- including Susan Bradley's frequently updated Patch Watch listing -- they also receive weekly AskWoody Plus Newsletters (formerly Windows Secrets Newsletter) and AskWoody Plus Alerts, emails when there are important breaking developments.
Get Plus!
Welcome to our unique respite from the madness.
It's easy to post questions about Windows 11, Windows 10, Win8.1, Win7, Surface, Office, or browse through our Forums. Post anonymously or register for greater privileges. Keep it civil, please: Decorous Lounge rules strictly enforced. Questions? Contact Customer Support.
Search Newsletters
Search Forums
View the Forum
Search for Topics
Recent Topics
-
Disengage Bitlocker
by
CWBillow
1 hour, 2 minutes ago -
Mac Mini M2 Service Program for No Power Issue
by
Alex5723
1 hour, 37 minutes ago -
New Win 11 Pro Geekom Setup questions
by
Deo
3 hours, 22 minutes ago -
Windows 11 Insider Preview build 26200.5651 released to DEV
by
joep517
8 hours, 53 minutes ago -
Windows 11 Insider Preview build 26120.4441 (24H2) released to BETA
by
joep517
8 hours, 54 minutes ago -
iOS 26,, MacOS 26 : Create your own AI chatbot
by
Alex5723
12 hours, 49 minutes ago -
New PC transfer program recommendations?
by
DaveBoston
3 hours, 10 minutes ago -
Windows 11 Insider Preview Build 22631.5545 (23H2) released to Release Preview
by
joep517
16 hours, 54 minutes ago -
Windows 10 Build 19045.6029 (22H2) to Release Preview Channel
by
joep517
16 hours, 55 minutes ago -
Best tools for upgrading a Windows 10 to an 11
by
Susan Bradley
5 hours, 14 minutes ago -
The end of Windows 10 is approaching, consider Linux and LibreOffice
by
Alex5723
2 hours, 36 minutes ago -
Extended Windows Built-in Disk Cleanup Utility
by
bbearren
15 hours, 4 minutes ago -
Win 11 24H2 June 2025 Update breaks WIFI
by
dportenlanger
1 day, 11 hours ago -
Update from WinPro 10 v. 1511 on T460p?
by
CatoRenasci
9 hours, 48 minutes ago -
System Restore and Updates Paused
by
veteran
1 day, 14 hours ago -
Windows 10/11 clock app
by
Kathy Stevens
1 day, 1 hour ago -
Turn off right-click draw
by
Charles Billow
1 day, 17 hours ago -
Introducing ChromeOS M137 to The Stable Channel
by
Alex5723
1 day, 21 hours ago -
Brian Wilson (The Beach Boys) R.I.P
by
Alex5723
15 hours, 3 minutes ago -
Master patch listing for June 10, 2025
by
Susan Bradley
1 day, 22 hours ago -
Suggestions for New All in One Printer and a Photo Printer Windows 10
by
Win7and10
1 day, 1 hour ago -
Purchasing New Printer. Uninstall old Printer Software First?
by
Win7and10
2 days, 4 hours ago -
KB5060842 Issue (Minor)
by
AC641
16 hours, 53 minutes ago -
EchoLeak : Zero Click M365 Copilot leak sensitive information
by
Alex5723
2 days, 11 hours ago -
24H2 may not be offered June updates
by
Susan Bradley
1 day, 4 hours ago -
Acronis : Tracking Chaos RAT’s evolution (Windows, Linux)
by
Alex5723
3 days ago -
June 2025 updates are out
by
Susan Bradley
5 hours, 53 minutes ago -
Mozilla shutting Deep Fake Detector
by
Alex5723
3 days, 15 hours ago -
Windows-Maintenance-Tool (.bat)
by
Alex5723
3 days ago -
Windows 11 Insider Preview build 26200.5641 released to DEV
by
joep517
3 days, 17 hours ago
Recent blog posts
Key Links
Want to Advertise in the free newsletter? How about a gift subscription in honor of a birthday? Send an email to sb@askwoody.com to ask how.
Mastodon profile for DefConPatch
Mastodon profile for AskWoody
Home • About • FAQ • Posts & Privacy • Forums • My Account
Register • Free Newsletter • Plus Membership • Gift Certificates • MS-DEFCON Alerts
Copyright ©2004-2025 by AskWoody Tech LLC. All Rights Reserved.