Macro to update Links

[howard]

I have the following macro to update link, but when running this macro it opens up the folder and I need to then select the workbook

I would like to incorporate the workbook within the code so I do not have to search for the workbook and click on it in order for the links to be updated

The workbook is in C:\my documents and called "Sales Report Ver 1.1.xlsm"

 Sub UpdateLinks()

        ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources, Type:=xlExcelLinks

 End Sub

Your assistance is most appreciated

 

[johnnyL]

?

ActiveWorkbook.UpdateLink Name:="C:\my documents\Sales Report Ver 1.1.xlsm", Type:=xlExcelLinks

 

[howard]

Thanks for the help

When running the macro, I get run time error'

method 'Updatelink' of Object'_workbook' failed