Hi all

having an issue where i run the below code:

Sub UpdateLinks()
Dim Location As Variant
Dim File_Name As String

Application.ScreenUpdating = False
Application.EnableEvents = False

Call unprotect
For i = 5 To WS_Admin.Range("C4").End(xlDown).Row

    File_Name = WS_Admin.Range("C" & i).Value & " Quote Tracker.xlsb"
    Location = Application.ActiveWorkbook.Path & "\" & File_Name
    ActiveWorkbook.UpdateLink Name:=Location, Type:=xlExcelLinks

Next i

Call protect

Application.EnableEvents = True
Application.ScreenUpdating = True

End Sub
The code runs without any errors but the destination workbook will not show the values from the source workbooks.

Strange thing is that if i double click on a cell that i know is different in the source workbook and hit enter just that individual cell updates.

what am i doing wrong?

Source workbooks are closed and all workbooks where created in the same version of excel.

Many thanks for your help as id be lost without the guidance of this forum.