Update and then break external links to another workbook

Hi everyone!

I am new in VBA, but I have a short procedure to break all external links in the currently active workbook.
Is there any option to firstly update all external links and only then break them?

Sub BreakLinks()
Dim Links As Variant
Dim i As Integer
With ActiveWorkbook
Links = .LinkSources(xlExcelLinks)
If Not IsEmpty(Links) Then
For i = 1 To UBound(Links)
.BreakLink Links(i), xlLinkTypeExcelLinks
Next i
End If
End With
End Sub


Thanks for the help in advance!