The following code is giving me a type mismatch error...I am trying to update the links when a tab is activated by a user...this was working yesterday for me which is why its really strange. The linked workbooks on are a network share drive and I have access to both of them..
Workbook1 has links to Workbook2
Workbook1 has links to Workbook2
Code:
Private Sub worksheet_activate()
Application.ScreenUpdating = False
linkarray = Workbooks("Workbook1.xlsm").LinkSources(xlExcelLinks)
[U][B]Workbooks("Workbook1.xlsm").OpenLinks linkarray(1), True, xlExcelLinks[/B][/U]
Workbooks("Workbook2.xlsm").Close
Application.ScreenUpdating = True
end sub