Macro not to update links when Opening Workbook

[howard]

I have the folowing Macro which opens a specific workbook and sets update Links to false

I would like the code amended so that the code can be inserted in the worksheet of the actual workbook i.e "Inventory Holdings Costs.xlsm"so that when it open the likns are not updated

Your assistance is most appreciated

 Sub OpenFile_UpdateLinksNo()
Application.Workbooks.Open Filename:="C:\my documents\Inventory holding costs", UpdateLinks:=False

End Sub

 

[Micron]

Put this in the target workbook in its open event?

ThisWorkbook.UpdateLinks = xlUpdateLinksNever

 

[howard]

Thanks for the reply. What do you mean by "Put this in the target workbook in its open event?"

 

[Micron]

You suggested putting code for this in a sheet in the workbook you want to open (the target workbook). I'm saying don't put the code in a sheet, put it at the workbook level and in the workbook open event. Then it will run when the wb opens.

 

[howard]

I have set up the code in this workbook as follows:

However, When Opening the File the update link message box still appears

When open the file for the first time, I do not want this message to appear

Once file is opening I then runn a macro to import data and then it will update the links

Kindly amend code accordingly

 Private Sub Workbook_Open()
ThisWorkbook.UpdateLinks = xlUpdateLinksNever
End Sub

 

[Alex Blakenburg]

My understaning is that when it is placed in the Workbook_Open event it doesn't trigger until after the update has already been run.

Consider putting it in BeforeSave

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    ThisWorkbook.UpdateLinks = xlUpdateLinksNever
End Sub

 

[howard]

Many Thanks Alex.

code works perfectly now

 

[Alex Blakenburg]

You're welcome. Glad we could help.